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This publication describes the internal 
logic and organization of the terminal 
monitor program (TMP) and the TSO service 
routines. It is written for persons who 
maintain or modify TSO and is not necessary 
for persons who use TSO to process programs 
or who write programs that are processed By 
TSO. 


External information is available in the 
following publications: 


OS/VSZ TSO Guide, GC28-0644, which 
describes what TSO is and what it can 
do. 


OS/VSZ TSO Terminal User's Guide, 
GO28-0645, which describes typical 
operations that a terminal user may 
perform. 


OS/VS2_ TSO Command Language Reference, 
GO28-0646, which describes the commands, 


subcommands, and operands of the TSO 
command language. 


OS/VS2 TSO Guide to Writing a Terminal 


Monitor Program or a Command Processor, 
GC 28-6764, which tells how to write 


foreground programs that will interact 
with or replace those supplied by TSO. 


This book consists of six parts, which 
are preceded by an introduction and 
followed by a glossary and an index. Each 
part is really a separate program logic 
manual, with its own introduction, method 
of operation, program organization, 
directory, data areas, and diagnostic aids 
sections. 


The “Introduction" describes the purpose 
and use of the terminal monitor program 
(TMP) and the TSO service routines and 
describes their relationship to the system. 
you should understand the "Introduction" 
before reading any of the other parts. 


Preface 


"Part 1: Terminal Monitor Program” 
describes the internal logic and 
organization of the terminal monitor 
program and its relationship to other 
programs including the TSO Control Program, 
the LOGON/LOGOFF Scheduler, the TSO command 
processors, and the TSO service routines. 


"Part 2: Terminal I/O Service Routines” 
describes the internal logic and 
organization of STACK, PUTLINE, GETLINE, 
and PUTGET and their relationship to other 
programs including the TSO Control Program, 
the Terminal Monitor Program and the TSO 
command processors. 


"Part 3: Command Scan and Parse Service 
Routines" describes the internal logic and 
Organization of command scan and parse and 
their relationship to other programs 
including the terminal monitor program and 
the TSO command processors. 


"Part 4: Dynamic Allocation Routines" 
describes the internal logic and 
organization of the dynamic allocation 
interface routine (DAIR) and the SVC 99 
dynamic allocation routines and their 
relationship to each other and to other 
programs, including the LOGON/ LOGOFF 
scheduler, the terminal monitor program, 
the TSO command processors. 


“Part 5: Default Service Routine” 
describes the internal logic and 
Organization of default and its 
relationship to other programs including 
PUTLINE, PUTGET, and the catalog 
information routine. 


"Part 6: Catalog Information Routine" 
describes the internal logic and 
Organization of the catalog information 
routine and its relationship to other 
programs including the routines invoked py 
the LOCATE macro instruction. 
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Figure 1. TSO System Overview 


At the highest level are the Time Sharing Contrc| 
Task ‘ TSCT } and the Message Control Program 
(MCP), The TSCT handles system-wide functions 
such as the initialization procedures required when 
the operator starts time sharing, and the swapping 
of foreground jobs in and out of real storage. 

The MCP is a part of the Telecommunications 
Access Method {TCAM) and handles !/O for all 


terminals, 


Below the TSCT is a Region Contro! Task {RCT ) 
for each foreground region, The RCT supervises 
the foreground jobs assigned to its region, 
including the quiescing and restoring of job 
activities before and after swapping. 


The Logon.Logaff Scheduler (LOGON) is 
invoked by the RCT whenever a user wants to 

log on or off the system and defines his foreground 
job using parameters in the logon procedure, 

user profile, and operands of the LOGON 


command, 


LOGON invokes a problem program specified by 
the user logon procedure. This program, normally 
the Terminal Monitor Program (TMP), handles 
TSO and user-supplied commands. One of these 
commands invokes the TEST command processor 
which has the same task level as the TMP. 


TSO command processors, and thei: subtasks, 
are at the lowest level, 

They perform the work reauired by the ter: ina! 
user, 


Introduction 13 


! 


Introduction 


The Time Sharing Option (TSO) extends the capabilities of the operating 
system to include general purpose time sharing from terminals supported 
by the Telecomminications Access Method (TCAM). 


You should remember three things about TSO: 
® The operating system supervises the execution of all TSO programs. 
e TSO provides time sharing. 


e TCAM provides terminal support. 


TSO System 


Figure 1 shows the relationship between major programs in a TSO system. 
Both TSO and TCAM execute as problem programs under the operating system 
control program, but as far as the terminal user is concerned, TSO is a 
system -- the only system he needs to know about. 


The terminal user describes the work he wants done by entering TSO 
commands. These commands are received by the terminal monitor program 
(TMP) which gives control to the appropriate TSO command processor. One 
TSO command invokes the TEST command processor which executes at the 
same task level as the TMP. All other command processors execute as 
subtasks of the TMP. 


As the TMP and the command processors execute, they may invoke the TSO 
service routines to perform the following operations: 


e Handling input/output operations to or from terminals supported by 
TCAM. 


e Searching input buffers for TSO commands and TSO command parameters. 


e Allocating and freeing data sets and performing other data 
Management functions. 


All service routines execute at the same task level as the program that 
invokes them. 


Terminal Monitor Program 


The terminal monitor progran obtains TSO commands, gives control to TSO 
command processors, and monitors their execution as shown in Figure 2. 


The TMP is a problem program executed by the IBM-supplied user logon 
procedure. An installation may write a similar program and substitute 
it for the TMP as described in the publication OS/VS2 TSO Guide to . 


Writing a Terminal Monitor Program or a Command Processor, GC28-0648. 
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The TMP does the following things: 


e Obtains a new command and gives control to the appropriate command 
processor. 


e Handles attention requests. 


e Attempts to recover from errors in a command processor or one of its 
subtasks. 


e Attempts to recover from errors in its own routines. 


e Returns control to the LOGON/LOGOFF scheduler when the operator 
issues a STOP command or when the terminal user enters a LOGON or 
LOGOFF command. 


From Logon/Logoff Scheduler 


LOAD-CALL 
Service Or LINK 


Routines Terminal Monitor Program TEST Command 


Processor 


(TMP) 


: ATTACH 


1(A Program To Be Tested ) 
I 


Command Processor Or 
User Program 


Figure 2. Terminal Monitor Program and Service Routines 


TSO Command Processors and User Programs 


TSO command processors are problem programs that perform the operations 
requested by a TSO command such as EDIT, CALL, RUN, ALLOCATE, etc. 
Figure 3 shows the functions performed by IBM-supplied TSO command 
processors. An installation may write similar programs for use as 
command processors as described in the publication OS/VS2 TSO Guide to 


Writing a Terminal Monitor or a Command Processor, GC28-0648. 


Some TSO command processors call on standard system processors to 
perform the requested function. For example, the COBOL command 
processor sets up a standard calling sequence according to the options 
selected by the user and transfers control to the ANS COBOL compiler to 
compile the user's program. Except for the special formatting of output 
and messages, the compiler operates exactly as it would in a non-TSO 
environment. 
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TEST Command Processor 


The TEST command processor allows the terminal user to test a command -) 
processor or other user program. Since it must be able to control the 

execution of command processors, the TEST command processor executes at 

the same task level as the IMP -- receiving control by a LINK, rather 

than an ATTACH, macro instruction. For further information about the 

TEST command processor, refer to the publication OS/VS2 Command Processs 


sor Logic Volume IV (TEST), SY35-0004. 


TSO Service Routines 


The TSO service routines are used by the TMP, TEST, and other TSO 
command processors. In general, they perform services needed by all TSO 
problem programs and their use as subroutines saves repetitive coding in 
the command processors. Figure 4 shows the functions performed by the 
TSO service routines. 


TERMINAL I/0 SERVICE ROUTINES 
The terminal I/O service routines handle terminal input/output 
operations required by the LOGON/LOGOFF Scheduler, the terminal monitor 


program, the TSO command processors, and other TSO problem programs. 


There are four terminal I/O service routines: 


e STACK -- which maintains a list Of input sources and defines the 
current source of input. 

e GETLINE -- which obtains a line of input from the terminal or from ) 
the current source of input. 

e PUTLINE -- which sends output or messages to the terminal. 

e PUTGET -- which sends a message to the terminal and obtains a line 


of input from the current source of input. 


COMMAND SCAN AND PARSE SERVICE ROUTINES 


Command scan and parse search the command buffer for TSO commands and 
their parameters. In general, command scan is invoked by the terminal 
monitor program while parse is invoked by TSO command processors. 
Command scan is also invoked by the TEST command processor and by TSO 
command processors that accept subcommands. 


DYNAMIC ALLOCATION INTERFACE ROUTINE AND SVC 99 


The dynamic allocation interface routine (DAIR) handles the allocation 
and freeing of data sets needed by the terminal monitor program, the TSO 
command processors, and other TSO problem programs. In general, DAIR 
obtains information about a data set and, if necessary, invokes the SVC 
99 dynamic allocation routines to perform the requested function. 


DEFAULT SERVICE ROUTINE AND CATALOG INFORMATION ROUTINE 


data set naming conventions. The cataloq information routine obtains 


The default service routine constructs a data set name that follows TSO . 
information from the system catalog. J 
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Figure 3 summarizes the functions performed by each TSO command 
processor and shows how each command processor receives control from the 


TMP. 

Se reg ee te nn a eg eg ee ee Dae ee ee ee 
{ Command | Function | Given control by | 
proms sa bo ann nnn anno 2a nn 2-2 ! 
| ALLOCATE|Allocate data sets. | ATTACH Macro Instruction | 
| | | | 
| ACCOUNT |Update the user attribute data set. |ATTACH Macro Instruction | 
| | | 
| ASM | Invoke Assembler Language Compiler. |ATTACH Macro Instruction | 
| | | | 
JATTRIB |Build a list of data set attributes.|ATTACH Macro Instruction | 
| | | 
| CALC J Invoke the ITF:PL/1 or CODE&GO J ATTACH Macro Instruction | 
| | FORTRAN | | 
| | | 
| CALL | Load and execute a load module. J ATTACH Macro Instruction| 
| | | 
{CANCEL |Cancel a foreground-initiated JATTACH Macro Instruction| 
I |background job. | | 
| | | | 
{COBOL |Invoke the ANS COBOL compiler. | ATTACH Macro Instruction | 
| | | 
| CONVERT? |Convert ITF:PL/1 or CODE&GO FORTRAN |ATTACH Macro Instruction | 
| {source programs to standard PL/1 or | | 
| | FORTRAN. | | 
| | | 
| COPY2 |Copy a data set (sequential or J ATTACH Macro Instruction| 
; |partitioned) to another data set. H | 
| | | 
|DELETE |Delete and uncatalog a data set or |ATTACH Macro Instruction| 
| [member of a partitioned data set. | | 
| | | | 
| EDIT [Create and/or edit a data set. {ATTACH Macro Instruction| 
| | | | 
| EXEC | Invoke a command processor or list |ATTACH Macro Instruction| 
[ |of command processors. | | 
| | 
[FORMAT1 |Format a data set. | ATTACH Macro Instruction | 
| | | 
| FORT+ | Invoke the FORTRAN IV Compiler. | ATTACH Macro Instruction | 
| | | 
| FREE |Free an allocated data set or an | ATTACH Macro Instruction | 
[ J attribute list. [ | 
| | | 
| HELP |Display information about command or|ATTACH Macro Instruction| 
| | subcommand. | | 
| | | | 
j/I PLI+ jInvoke the ITF:IPLI compiler. | ATTACH Macro Instruction | 
| | | | 
| LI NK {Invoke the linkage editor. | ATTACH Macro Instruction] 
| | 
| LIST+ {List one or more data sets. { ATTACH Macro Instruction| 
| | | 
| LISTALC |List allocated data sets. | ATTACH Macro Instruction | 
| | | | 
| LISTBC |List messages from operator or other|ATTACH Macro Instruction| 
| Jusers as entered on the broadcast | | 
| | data set. | | 
Bsee ee 1—--_-_~-~-----~-~-~+------~----~ +--+ 4L---- --- ---- --------~---- J 
Figure 3. Functions Performed by TSO Command Processors (Part 1 of 2) 
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a tg ee ee ye a ee Wi eo ee 1 
| Comma nd | Funct ion | Given Control by | 
}-------- }------------------- ---~--- ---------- t------------------------ { 
| | | | | 
J}LISTCAT |List catalog entries. | ATTACH Macro Instruction | 
| ! | 
|LISTDS |List the attributes of one or more’ |ATTACH Macro Instruction| 
| {data sets. | | 
| | | | 
|LOADGO |Load and execute an object module. |ATTACH Macro Instruction| 
| | | | 
|LOGOFF |End a terminal session {ATTACH Macro Instruction| 
| | | | 
| LOGON {Begin a terminal session. [ATTACH Macro Instruction| 
| | 
|MERGE+ |Combine data sets. |LINK Macro Instruction | 
| | | 
| OPERATOR|Make the terminal an operator's [ATTACH Macro Instruction| 
| {console. | | 
| | | 
JOUTPUT |Direct the output for a | ATTACH Macro Instruction] 
| | foreground-initiated background job. | | 
| | | 
| PL1I2 | Invoke the optimizing PL/1 compiler.|ATTACH Macro Instruction| 
| | | | 
| PLIc? | Invoke the checkout PL/1 compiler. |ATTACH Macro Instruction| 
| | | | 
| PROFILE | Update the user profile table (UPT).|ATTACH Macro Instruction] 
| | | | 
| PROTECT |Create or modify a password. | ATTACH Macro Instruction| 
| | | 
|RENAME |Rename a data set or a member of a _ |ATTACH Macro Instruction| 
| | partitioned data set. | | 
| | | 
{RUN |Compile, load, and execute a | ATTACH Macro Instruction | 
| program. [ | 
| 
| SEND |Send a nessage to the operator or to]ATTACH Macro Instruction| 
| -|a terminal user. | | 
| | | 
{STATUS |List the status of a | ATTACH Macro Instruction | 
| | foreground-initiated background job. | | 
| | 
| SUBMIT |Submit a job for interpretation and |ATTACH Macro Instruction| 
[ jexecution in the background. | | 
| | | | 
{TERMI NAL|Update the protected step control [| ATTACH Macro Instruction | 
| | block (PSCB). | | 
| | | 
| TEST |Test a command processor or user {LINK Macro Instruction | 
: creo | 
| TESTFORT*Test a FORTRAN program using | ATTACH Macro Instruction | 
| |symbolic references. | | 
| | | 
| TIME | List CPU time. | Branch-and-1link- | 
| | |xregister instruction | 
| | 
| WHEN |&stablish condition for initiation |ATTACH Macro Instruction | 
| Jor termination of a command ] 
| | processor. | | 
pos Oa i OI a Eh ah J 
J*Optional program products; available for a license fee. [ 
a ee a ne eg red aE yA ce eo ee ne en ot me EE J 
Figure 3. Functions Performed by TSO Command Processors (Part 2 of 2) ) 
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As the TMP, TEST, and other command processors execute, they may 
request services from any of the TSO service routines shown in Figure 4. 


I/O Service Routines| STACK IKJPTGT |Maintains stack of input| 
[|sources. The top | 

Jelement describes the H 

| current source of input. | 

|The bottom element | 

| describes the terminal | 

Jas a source of input. [ 

| | 

GETLINE IKJPTGT |Gets a line of input | 
{from the current source | 

Jor from the terminal. | 

| 

| 

| 

| 

| 

| 

| 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| | 
| IKJPTGT jSends a line of output 
| {to the terminal. 

| | 

| IKJPTGT {Sends a line of output 
| jto the terminal; gets a 
| j line of input from the 
| | terminal. 

4 
| 
| 
4 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


[Dynamic Allocation 
| Interface Routine 
{Command Scan/Parse 
|Service Routines 


+ 
IKJDAIR | Allocates [ 
jdata sets. | 


+——+— = — 


{valid syntax. 


| 
IKJPARS {Checks command 


| parameters for valid 
|syntax. 


Parse 


| | 
| | 
| | 
| | 
! 
|Default Service | IKJ EHDEF |] Constructs a data set | 
| Routine | TIKJDFLT [mame according to TSO | 
| |maming conventions. { 
t { 
| | 
| | 
| | 
4 J 
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|Catalog Information |CIR 
| Routine 


IKJEHCIR [Searches the system 
| catalog for information 
[about data sets. 


Figure 4. Functions Performed by TSO Service Routines 
These service routines are invoked using system macro instructions. The 


internal logic of these routines is described in separate parts of this 
book. 
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Section 1: Introduction 


The terminal monitor program obtains TSO commands, gives control to TSO 
command processors, and monitors their execution. 


The TMP is a problem program executed by the IBM-supplied user logon 
procedure. An installation may write a similar program and substitute 
it for the TMP as described in the publication OS/VS2 ISO Guide to 


Writing a Terminal Monitor Program or a Command Processor, GC28-0648. 


The TMP obtains its first command from the user logon procedure and 
gives control to the appropriate command processor. After the first 
command has been processed, the TMP does one of the following: 


e Obtains a new command and gives control to the appropriate command 
processor. 


e Handles attention requests. 


e Attempts to recover from errors in a command processor or one of its 
subtasks. 


e Attempts to recover from errors in its own routines. 


e Returns control to the LOGON/LOGOFF scheduler when the operator 
issues a STOP command or when the user enters a LOGON or LOGOFF 
command. 


As supplied with TSO, the TMP will reside in SYS1.LINKLIB and will 
execute in the user’s foreground region with the protection key assigned 
to that region. The installation may choose to make the TMP resident in 
the TSO Link Pack Area (TSLPA) in the region assigned to the Time 
Sharing Control Task (TSCT). 
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Section 2: Method of Operation 


This section describes the method of operation of the terminal monitor 
program. It includes six method of operation diagrams: 


Each method of operation diagram includes a cross-reference table to 
help you find the appropriate assembly listing. 


Method of Operation Diagram 1: Terminal Monitor Program -- which 
shows the basic functions performed by the TMP. 


Method of Operation Diagram 2: TMP Initialization -- which shows 
how the TMP completes the logon process by setting up tables and 
control blocks that define the user's environment in the foreground 
region. 


Method of Operation Diagram 3: Handiing Commands -- which shows how 
the TMP obtains commands from the terminal and gives control to the 
appropriate command processor. 


Method of Operation Diagram 4: Handling Attention Requests -- which 
Shows how the TMP handles terminal attention requests. 


Method of Operation Diagram 5: Handling STAI Requests -- which 
shows how the TMP attempts to recover from errors in a command 
processor or one of itS programs. 


Method of Operation Diagram 6: Handling STAE Requests -- which 
shows how the TMP attempts to recover from errors in its own 
programs. 


Overview 


Method of Operation Diagram 1 shows how the TMP obtains TSO commands, 
gives control to TSO command processors, and monitors their execution. 


Briefly, here is what happens: 
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The TMP receives control from the LOGON/LOGOFF scheduler as the 
program named by the first EXEC statement in the user logon 
procedure. 


The TMP completes the logon process py setting up tables and control 
blocks that define the user’s environment in the foreground region. 


The TMP obtains TSO commands and gives control to the appropriate 
TSO command processors, one at a time. 


When a TSO command processor completes normally, the TMP obtains a 
new TSO command and gives control to a new TSO command processor. 


When a TSO command processor is interrupted by an attention at the 


TMP level, the TMP attention exit routine handles the attention 
request. 
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e When a TSO command processor begins to terminate abnormally, the TMP 
STAI Exit Routine attempts to recover from the error. 


e When the TMP begins to terminate abnormally, the TMP STAE exit 
routine attempts to recover from the error. 


‘@ The TMP returns control to the LOGON/LOGOFF scheduler when the user 
enters a LOGON or LOGOFF command or when the operator issues a STOP 
command. 


Figure 5 summarizes the functions performed by the TMP. 


Freee ee te gt ee ME ae oe I ay ne ee ea 1 
| Event | Action Taken | 
SP ee a ON A a ee ge eee es ea ee ee eae ee 
|Command processor completes |TMP obtains a command and gives control | 
|normally. |to the next command processor. See | 
| |Diagram 3 (foldout). ( 
| Command processor interrupted|TMP attention exit routine displays 
[by attention. |second-level messages in response toa | 
| [question mark or obtains a new command | 
| Jto replace the command that was ; 
| jinterrupted. See Diagram 4 (foldout). | 
|-----------------------------}--------------------+------------------ ! 
[Command processor begins to |TMP STAI exit routine attempts to ; 
Jterminate abnormally. Jrecover from the error. See Diagram 5 | 
| | (foldout). ‘| 
-------------------------—--- }---------------------------------------- 
| TMP begins to terminate | TMP STAE exit routine attempts to ; 
[terminate abnormally. | recover from the error. See Diagram 6 _ | 
| | (foldout). | 
}----------------------------- }---------------------------------------- ! 


[Operator or terminal user has|TMP returns control to the LOGON/LOGOFF [ 
|requested logoff or re-logon.|Scheduler. [ 
be See ee ee a ae te ee ee eee ee J 


Figure 5. Functions Performed by the Terminal Monitor Program 


Initialization 


Method of Operation Diagram 2 shows how the TMP completes the logon 
process by setting up tables and control blocks that define the user's 
environment in the foreground region. 


Briefly, here is what happens: 


e The TMP receives control from the LOGON/LOGOFF scheduler as the 
program named by the first EXEC statement in the user logon 
procedure. 


e At entry, register i contains the address of a buffer that contains 
the PARM value from the first EXEC statement in the user logon 
procedure. 


e The TMP uses an EXTRACT macro instruction to obtain the address of 
the protected step control block, which contains the address of the 
user profile table (UPT). 


e The TMP sets up the environment control table (ECT) and two internal 


word areas: the TMP Work Area (TMPWORKA) and the TMP retry work 
area (TMPWA2). 
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e The TMP sets up the TMP attention exit by issuing a STAX macro 
instruction and loading the TMP Attention Exit Routine. 


e The TMP sets up the TMP STAE exit by issuing a STAE macro 
instruction and loading the TMP STAE Exit Routine. 


e The TMP partially sets up the STAI exit by loading the STAI exit 
routine. Later, when the TMP attaches a command processor, the STAI 
Operand on the ATTACH macro instruction provides supervisor linkage 
to the STAI exit routine. 


e The TMP loads the TIME command processor. 


e The TMP sets up the command buffer and obtains its first command 
from the PARM field of the first EXEC statement in the user logon 
procedure. 


when initialization is complete, the TMP is ready to process the first 
command. 


Handling TSO Commands 


Method of Operation Diagram 3 shows how the TMP obtains 


commands from the terminal and gives control to the appropriate command 
processor. 


Briefly, here is what happens: 


e The TMP uses the PUTGET service routine to obtain a line of input 
from the terminal or from an in-storage list. The command buffer 
(CBUF) receives the line of input. 


e The TMP uses the command scan service routine to search the command 
buffer for a command name, a question mark, or a null line. The TMP 
tests for four special cases and takes the appropriate action: 


Grea ee ee ee Rg Oe Rs er a eS 1 

| Buffer Contains Action Taken by TMP 

[eee a ee ee ee eee ee eee 
TIME Branch to TIME command processor. 
TEST 


L 
Question mark Display all chained second level 
m 


| 
| 
| 
| 
ink to TEST command processor. | 
| 
| 
essages. (Done by PUTGET.) | 

| 

| 

J 


PCS SQV 


® The TMP searches the command library to obtain the TSO command 
processor that corresponds to the TSO command. If it cannot find 
the command processor, the TMP assumes that the intended command is 
EXEC and that the conimand buffer contaius a valid member name. 


e The TMP attaches the command processor as a subtask and waits for it | 
to complete as shown in Method of Cperation Diagram 1 (foldout). i 
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Handling Attention Requests 


Method of Operation Diagram 4 shows how the TMP handles terminal 
attention requests. 


During initialization, the TMP loads the attention exit routine and 
sets up supervisor linkage to it by issuing a STAX macro instruction. 
The STAX service routine builds a terminal attention exit element (TAXE) 
and a terminal attention interrupt element (TAIE) and chains them to the 
TMP’s TCB. 


Later, when the terminal user signals attention, program execution is 
interrupted and the attention scheduler (a part of the region control 
task) gets control. The attention scheduler checks the TCB of the 
interrupted program for a terminal attention exit element and schedules 
the most recently specified attention exit routine. 


If the interruption occurs while the TMP is processing, the TMP'‘s 
attention exit routine receives control. If the interruption occurs 
while a command processor is processing, the command processor's 
attention exit routine receives control unless the attention is signaled 
twice. Signaling attention two times in quick succession will cause the 
next higher-level attention exit routine to receive control. 


The TMP attention exit routine uses the command scan service routine 
to search the attention buffer for question mark, null line, or command 
name. The contents of the attention buffer determine the action taken 
by the TMP attention exit routine, as shown in Figure 6. 


eee Se ee oe Me et Gs ee a 1 
| Buffer Contains jAction Taken by TMP Attention Exit Routine | 
[-------------------- $—- ~~ ----- nn no { 
[Question mark [Writes second-level message to the terminal using| 


| | PUTLINE service routine. Prompts terminal for | 
| Janother line of input using PUTLINE and GETLINE | 
| |service routines. | 


jNull line |Returns to attention scheduler which restarts 
| J interrupted program from the point of 
| jinterruption. 


| Invalid Command |Writes error message using the PUTLINE service 
| {routine. Prompts terminal for another line of 
| Jinput using the PUTLINE and GETLINE service 

| | routines. 


| TIME |Branches to TIME command processor to obtain 

| [elapsed time, CPU time, and time for the terminal | 
| | session. | 
jOther Valid Commands|Places command name in command waiting field of | 
| jthe TMP work area (TMPWORKA) and posts the TMP | 
| Jattention ECB. The TMP will detach a previously | 
| jJattached command processor, if any, and obtain | 
| [the new command. See Diagram 3 (foldout). | 
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Handling STAI Requests 


Method of Operation Diagram 5 shows how the TMP attempts to recover from 
errors in a TSO command processor or one of its programs. 


During initialization, the TMP loads the STAI exit routine. Later, 
when the TMP attaches a command processor as a subtask, the TMP includes 
a STAI operand on the ATTACH macro instruction specifying the entry 
point of the STAI Exit Routine. 


The STAE service routine builds a STAI control block and chains it to 
the TCBNSTAE field of the command processor's TCB. Note that the STAE 
service routine handles both STAE and STAI exit routines. 


When an error occurs in the command processor or one of its subtasks, 
interrupted program for a terminal attention exit element and see if any 
STAI or STAE control blocks have been chained and, finding one, passes 
control to the ABEND/STAE interface routine. Note that the ABEND/STAE 
interface routine handles both STALE and STAI requests. 


The ABEND/STAE interface routine quiesces all active I/0, purges all 
ready 1/0, and schedules the most recently specified STAE exit routine 
by issuing a SYNCH macro instruction. Normally, the command processor's 
STAE exit routine will get control. 


The TMP attention exit routine uses the command scan service routine 
attempts to diagnose the cause of the error, uses a return code to mark 
it recoverable or unrecoverable, and returns control to the ABEND/STAE 
interface routine. This routine passes control to the STAE retry 
routine (if one is specified) which will attempt to restart the 
interrupted program. 


-I£f the retry is not successful, or if no retry routine was specified, 
the ABEND/STAE interface routine checks the STAE/STAI chain for the most 
recently specified STAI exit. Note that only one STAE exit routine is 
ever executed, while any number of STAI exit routines may be executed. 


The TMP STAI exit routine uses the PUTLINE service routine to write a 
message to the terminal indicating that the task has failed. It then 
checks to see whether the error occurred in a command processor running 
under the TMP or running under the TEST command processor. 


If the error occurred in a command processor running under the TEST 
command processor, the STAI exit routine posts the TMP STAI ECB and 
transfers control to the TEST command processor. 


The STAI exit routine then waits on the command processor's ECB. The 
TEST command processor posts this ECB immediately, specifying a retry 
address. The STAI exit routine marks the ABEND recoverable and returns 
control to the ABEND/STAE interface routine. The ABEND/STAE interface 
routine passes control to the retry address, which is an entry point in 
the TEST command processor. 


If the error occurred in a command processor running under the TMP, 
the TMP STAI exit routine posts the TMP STAI ECB and immediately 
transfers control to the TMP mainline routine. 


The STAI exit routine then waits on the command processor's ECB. The 
TMP posts this ECB whenever it is impossible to recover from the error. 
The TMP mainline routine then prompts the terminal to enter another 
command using the PUTGET service routine. 
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‘The TMP mainline routine uses the command scan service routine to 
search the buffer for the TEST command name and, upon finding it, 
transfers control to the TEST command processor. 


Except for the TIME or TEST commands, any valid command in the input 
buffer causes the command processor to be detached, thereby canceling 
the outstanding STAI request. 


If the buffer contains a null line, the ECB for the abnormally 
terminating command processor is posted. The STAI exit routine then 
checks the post code, marks the ABEND unrecoverable, and returns control 
to the ABEND/STAE interface routine. 


All other input is processed as though the STAI condition had not 
occurred. 


The ABEND/STAE interface routine checks the TCB of the failing task 
for another STAI exit and, finding none, returns control to the ABEND 
routine, which terminates the task. 


Handling STAE Requests 


Method of Operation Diagram 6 shows how the TMP attempts to recover from 
errors in its own code. 


During initialization, the TMP loads a STAE exit routine and sets up 
supervisor linkage to it by issuing a STAE macro instruction. The STAE 
service routine builds a STAE Control Block and chains it to the TMP's 
TCB. 


When an error occurs in the TMP, the ABEND routine checks the TMP‘s 
TCB for a STAE control block and, finding one, passes control to the 
ABEND/STAE interface routine, which marks the task non-dispatchable and 
passes control to the TMP's STAE exit routine. 


The TMP mainline routine uses the command scan service routine to 
ABEND/STAE interface routine, which marks the task non-dispatchable and 
passes control to the TMP's STAE exit routine. 


The TMP's STAE exit routine attempts to diagnose the cause of the 
error and returns to the ABEND/STAE interface routine with a return code 
that indicates whether the error is recoverable or not recoverable. If 
the error is not recoverable, the ABEND/STAE interface routine returns 
control to the ABEND routine, which terminates the task. If the error 
is recoverable, the ABEND/STAE interface routine passes control to the 
TMP's STAE retry routine, which attempts to restart the TMP. 


The TMP‘s STAE retry routine determines whether a recovery has been 
attempted for this command processor. If so, the STAE retry routine 
deletes all TMP modules and transfers control to the TMP initialization 
routine, IKJEFT0O1. Otherwise it transfers control to the TMP mainline 
routine, IKJEFTO2. 


If the retry is successful, TMP processing continues as if nothing 
had happened. If the retry is not successful, the ABEND routine passes 
control to the ABEND/STAE interface routine which passes control to the 
TMP‘s STAE routine for cleanup operations before returning to the 
ABEND/STAE interface routine. 


The ABEND/STAE interface routine then checks the IMP's TCB for the 


most recently specified STAI exit routine and, finding none, returns to 
the ABEND routine which terminates the TMP. 
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INPUT PROCESSING RESULT 
Terminal Monitor Program ' IKJEFTOI 
A ATTACH from 
LOGON/ Obtains TSO Commands, Gives Control Command Library 
LOG OFF to TSO Command Processors and Monitors 


Scheduler Via Their Execution: 
Job Management 


1 Completes LOGON Process, al 
so . 
“ 
2 Obtains TSO Commands and Gives ~~ 
Control to TSO Command Processors, 
One at a Time, TSO Command Processor 
ATTACH * Performs Operations Requested 
3 Handles Attention Requests. by TSO Command, 
@ Attempts to Recover from Errors in 
TSO Command Processor or Subtask, 
RETURN 
& Attempts to Recover from its Own 
Errors, 
6 Begins LOGOFF Process, * Most TSO Command Processors Receive 
Control by an ATTACH Macro 
Instruction, TIME is Entered by a Branch, 
TEST is Entered by o LINK Macro 
Instruction, 
A 


“*STEP] EXEC PGM_ IKJEFTOO 


RETURN | : 
LOGON/LOG OF F Initiator ’ a 


Scheduler Terminato ‘3 TMP 


To LOGON/LOG OFF Scheduler ATTACH from the 
Region Control 


Task (RCT), 


The TMP is Attached by an Inittato: lerminato: 
at the Program Numed by the First EXEC 
Statement of the Uses LOGON Procedure, 


Method of Operation Diagiam 1, Terminal Monitor Program 


Method of Operation Diagram 1. Terminal Monitor Program (Part 1 of 2) 
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EE 


CROSS REFERENCE TABLE 


The TMP is attached by an initiator / terminator as the program named by Initialization | IKJEFTO! 


the first EXEC statement in the user logon procedure, The TMP completes 
the logon process by setting up tables and control blocks that define the 


user's environment in the foreground region, 


2 The TMP obtains commands from the terminal and gives control to Mainline IK JEFTO2 


the appropriate command processor, one ata time. 
processors are attached as subtasks of the TMP, Exceptions are TIME 
(which is branched to) and TEST (which is linked to), 


Most command 


3 The TMP handles attention interrupts by displaying second-level Attention IK JEFTO3 
messages in response to a question mark or by obtaining a new command Exit Routine 


to replace the one that was interrupted. 


@ The TMP attempts to recover from errors in a command processor or one STAI Exit IK JEFTO4 
of its subtasks by allowing the user to enter a TEST command, Routine 


5 The TMP attempts to recover from errors in its own code by diagnosing the | STAE Exit IK JEFTOS 
cause of the error and, if possible, by restarting the TMP. Routine 


STAE Retry IK JEFTO7 
Routine 


6 The TMP performs cleanup operations and returns to the LOGON/LOGOFF | Mainline IK JEFTO2 


scheduler when the operator issues a STOP or MODIFY command or 
when the user issues o LOGON or LOGOFF command. 


Method of Operation Diagram 1. 


Terminal Monitor Program (Part 2 of 2) 


he 


Register | 


INPUT PROCESSING 
ATTACH from TMP Initialization IK JEFTOI 


LOGON/LOGOFF 
Completes user LOGON process. 
Sets up exit routines, 


via Job 
Management or 

Obtains the Address of the PSCB 
and UPT, 


TMP Parameter List 


f Parameter Buffer 


XCTL from STAE 
Retry Routine, 


RESULT 


Environment Control Table ( ECT) 


Contains informution 
ebout tie user's 
environmen! in the 
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foreground region, 


Protected Step Control Block (PSCB) 


TMP Work Area (TMPWORKA) 


a 


TMP Retry Work Area 
( TMPWA2 ) 


Builds the ECT. 


User Profile Table (UPT) Builds the TMP Work Area and Retry 


Work Area. IK JEFTO4 


Input Stack (INSTACK ) 
Note: 


j % 
Sets Up the STAE, STAI and Attention fy ; 7) See 
CO: we Viewed 
2 fie , CA ie ff , 
“ Jf of we Pa y, 


Exits, STAE Exit 


Routine Operation 


Diagram 
service 
ees routine 


Command Buffer (CBUF ) 


SUBPOOL | 


Porameter Buffer 


ew [one 


SUBPOOL 0 


Sets Up the Input Stack, 


Sets Up the Command Buffer, 


Note: If entry is from the STAE Retry Routine 
(IK JEFTO7) the first word contains X'FFFFFFFF * 
and the second word contains the address of the 
TMP Retry Work Area, See Diagram 6, 


Transfers Control to TMP 
Mainline Routine (IK JEFTO2), 


See Operation Diogram 3, 


TMP Initialization (Part l of 2) 


Operation 
Diagram 


Method of Operation Diagram 2. 
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CROSS REFERENCE TABLE 


IK JEFTO} 


1 The TMP uses an EXTRACT macro instruction to obtain the address of the 
Protected Step Control Block (PSCB) which contains the address of the 
User Profile Table (UPT). 


2 The TMP constructs the Environment Control Table (ECT) from 
information contained in the PSCB and UPT, 


3 The TMP builds two major internal work areas: the TMP Work Area 
(TMPWORKA) and the TMP Retry Work Area (TMPWA2). TMPWORKA 
contains parameter lists and control information for normal operation. 
TMPWA2 contains information needed by the TMP STAE Retry Routine. 


4 The TMP sets up the STAE exit by issuing a STAE macro instruction and 
loading the STAE exit routine, 


The TMP sets up the Attention exit by issuing a STAX macro instruction 
and loading the Attention exit routine, 


The TMP sets up the STAI exit by loading the STAI exit routine and 
(later on, in Diagram 5) by including the STAI operand on the ATTACH 
macro instruction when giving control to a command processor, 


The TMP loads the TIME command processor. 


§ The TMP initializes the first element on the Input Stack to describe the 
terminal as the current source of input, 


6 The TMP sets up the Command Buffer (CBUF ) and initializes it with the 
value from the PARM field of the first EXEC statement in the user logon 
procedure, 


Initialization 


LDSTAE 
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INPUT 


Input Buffers XCTL from TMP 
Initialization 

(See Operation 
Diagram 2) or from 
TMP STAE Retry 
Routine (See 
Operation Diagram 6). 
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Method of Operation Diagram 3. 


PROCESSING 
TMP Mainline IK JEFTO2 


Obtains TSO Commands and Gives 
Control to TSO Command Processors, 


] Obtains a line of Input in an Input 
buffer, 


2 Searches the buffer for a valid TSO 


command, 


e If buffer begins with question mark, 
writes second-level messages. 


e If buffer contains null line, 
ignores line, 


e If buffer contains ‘TIME * branches 
to TIME command processor, 


@ If buffer contains ‘TEST " links 
to TEST command processor. 


3 Searches the command Library for_ — - a 
the TSO command processor, 
and attaches it as a subtask, 


4 Waits for command processor to 
complete, 


5 Obtains another line of Input. 


Repeat Step 2, 


RESULT 


Command Library 


TSO Command 
Processor 


TSO Command Processor 


A A 
TTACH / WAIT Performs Operations Requested 
; by TSO Command, 
faa 


Command Processor 
Parameter List 


\ 


POST /RETURN 


Handling TSO Commands (Part 1 of 2) 
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CROSS REFERENCE TABLE 


1 The TMP obtains a TSO command from one of four input buffers, depending upon the situation: 


e At entry from the LOGON/LOGOFF scheduler, the TMP obtains a command from the TMP IK JEFTOI 
PARM Buffer, Initialization 

e When handling an attention request, the TMP may obtain a command from the Attention TMP ATTNPOST 
Buffer pointed to by the CMDWAIT field of the TMP Work Area, Initialization 

e@ When handling a STAI request, the TMP may obtain a command from the STAI Buffer STAIPOST 
pointed to by the CMDWAIT field of the TMP Work Area. 

e When a command processor has completed, the TMP obtains a command from the command GETCMD 
buffer, 


2 The TMP searches the buffer for a valid command name, In most cases, the TMP then searches the SCAN 
user command library to find the appropriate command processor and attaches it as a subtask 
(Step 3), In five cases, the TMP processes the contents of the buffer without having to search the 
user command library or attach a subtask, These cases are: 


Buffer Contains Action Taken 

question mark Writes chained second - level messages to the terminal, 
null line Ignores the line. 

invalid command Writes an error message to the terminal. 

TIME Branches to the TIME command processor. 

TEST Links to the TEST command processor. 


The TMP then prompts the terminal to enter another command (Step 1). 


3 ~The TMP searches the user command library to obtain the command processor corresponding to the BLDL 
command name and attaches it as a subtask. {f the command processor is not found, the TMP 
assumes that the intended command processor is EXEC and that the buffer contains a valid member IMPLEX EC 
name, 

4G The TMP waits on the command processor ECB. The dispatcher gives control to the command WAIT 


processor and allows it to execute. 


& When the TMP regains control from thr dispatcher following a post of an ECB, it determines LIST 
why it got control and takes the appropriate action: 
ECB Posted Action Taken 
cP Obtains another command, See Step 1, 
ATTN Obtains another command, See Step 1. 
STAI Obtains another command. See Step |. 
LOGOFF Performs cleanup operations before returning to the 


LOGON/LOGOFF scheduler. 
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Job Management 
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Terminal Monitor Program STAX Service Routine Setting the TMP Attention Exit 


TMP TCB 


2 Sets Up Supervisor 


1 Sets Up the Attention Exit. Linkage to Attention 


Exit Routine, 


3 Attaches a TSO Command 
Processor and Waits on ECB 
List. 


TSO Command Processor 
: 
x 


4 Attention Buffer 


TMP Attention 
EXIT Routine 


Note: If the command Processor (or one of its programs has specified 
an attention exit, its exit routine will receive control before the 


TMP's.) 


ATTENTION INTERRUPTION 


7 Detaches the Current TSO 
Command Processor, Attaches 
New One, and Waits on ECB 

List. 


IK JEARO4 
IK JEAROS 


Attention 
Scheduler 


TMP Attention 
POST/ Exit Routine 


6 Checks for TIME, 
Question Mark, or Null 
Line, 


IK JEFTO3 


5 Gets a line of Input 
from terminal, 
Schedules TMP 
Attention Exit 
Routine, 


TGET 


Attention Exit 
Parameter List 


= IN 


Places address of buffer 
in TMP Work Area. 
Posts TMP Attention ECB, 


ATTACH TSO Command Processor 


4 Attention Buffer 


i i ee 


Continue Processing 
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wer6etq uotzerzsdg jo poyAon 


CROSS REFERENCE TABLE 


1 The TMP issues a STAX macro instruction specifying an Attention Exit TMP IK JEFTO] 
Routine, Initialization 


STAX Service 


Routine 


2 The STAX Service Routine sets up the necessary control blocks and returns 
control to the TMP, 


TMP IK JEFTO2 


Mainline 


3 The TMP continues processing, obtaining commands, attaching 
command processors, waiting on an ECB list, etc, 


@ At some point during the processing of a command, the user presses the 
Attention key, 


ATTN 
Scheduling 
Routine 


IK JEARO4 
IK JEARO5 


5 The Attention scheduling routine in the Region Control Task (RCT) gets 
control and issues a TPUT SVC to write a "READY " message to the 
terminal and a TGET SVC to get a line of input from the terminal. It 
then schedules the TMP Attention Exit Routine, 


TMP IK JEFTO3 
Attention 


Exit 


The Attention Buffer is scanned for a valid command using Command Scan, 
TIME and question mark requests are handled directly. Otherwise, the 
interrupted task is marked non-dispatchable using the STATUS macro 
instruction with a STOP operand. The new command is moved into the 
Command Waiting field of the TMP Work Area and the ATTN ECB is posted. 


TMP IK JEFTO2 


Mainline 


When the TMP regains control, it finds that its ATTN ECB has been posted. 
The TMP detaches the Interrupted command processor and attaches the 
new command processor, 
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eulees Terminal Monitor Program 
rom 


ATTACH 


LOGON/ Sets up command processor 
LOGOFF 1 Sets up TMP STAI Exit. 2 STAE eae . 
Scheduler 


See A 


See B STAE Processing 
3 C nd Pr ABEND/STAE Interface Routine 
omma ocessor 


Schedules STAE Exit wil CP STAE Exit Routine 


Routine, 


abnormally terminates. 


SVC 13 


STAI Processing ABEND Routine 


6 Anolyzes error. 
Marks 

recoverable or 

unrecovernble, 


ABEND/STAE Interface Routine 


Q Schedules TMP STAI Exit 
Routine, 


IK JEPTOA 


TMP STAI Exit Routine : 


10 Attempts to recover from error, 


No 
7 Recoverable ? 
Bai 
7 Routine ? 


Betting up the Command Processor's STAE Exit 


STAE TMP STAI 
Command Service Exit Routine 


Processor Routine 


CP STAE Retry Routine 


7 Attempts to retry 
the task, 


Continues ABEND 
Processing 


Concel ABEND 


Terminal STAE 
Monitor Service 
Routine 
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CROSS REFERENCE TABLE 


During initialization, the TMP loads the TMP STAI Exit Routine, Later, when the TMP gives TMP Initialization IK JEFTO! 
control to a command processor, it issues an ATTACH macro instruction with a STAI operand, TMP Mainline IK JEFTO2 
The STAE service routine builds a STAI Control Block specifying the address of the STAI Exit Routine | STAE Service 
and chains it to the TCBNSTAE field of the command processor's TCB, Routine 


The command processor, during its initialization process, issues a STAE macro instruction specifying | Command Processor 
the address of a STAE exit routine and, possibly, a STAE retry routine, The STAE service routine 


builds a STAE Control Block and chains it to the TCBNSTAE field of the command processor's TCB, 


STAE Service 
Routine 


When an error in the command processor results in an ABEND, control passes to the ABEND Routine, | Command Processor 


The ABEND routine recognizes that there is a STAE exit routine and passes control to the ABEND Routine 


ABEND/STAE interface routine. 


ABEND/STAE 


Interface 


The ABEND/STAE interface routine quiesces all active |/O, purges all ready I/O, attempts to 
establish a work area, and schedules the command processor's STAE exit routine by issuing a 
SYNCH macro instruction, 


The command processor's STAE Exit Routine analyzes the error and marks it recoverable or Command Processor 


unrecoverable, 


Command Processor 


STAE Retry 


If the error is recoverable, the ABEND/STAE interface routine passes control to the STAE retry 
routine, if any, which attempts to retry the failing task, 


If the attempt is successful, the ABEND is cancelled. Otherwise, control is returned to the ABEND 
routine which recognizes a STAI Exit Routine, 


ABEND/STAE 


Interface 


The TMP STAI Exit Routine is scheduled using a SYNCH macro instruction, 


If the Command Processor's STAF Exit Routine has marked the error unrecoverable, control is TMP STAI Exit IK JEFTO4 
returned to the ABEND Routine, Otherwise the TMP STAI ECB is POSTed, If the TEST command 
processor had control, TEST is re-entered, Otherwise, the user is prompted for a command and 


given a chance to attempt to recover from the error, 


TMP Mainline IK JEFTO2 


STAIPOST 


If the attempt is not successful, control is returned to the ABEND routine, ABEND Routine 


If the attempt is successful, the ABEND is cancelled. 
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ATTACH from LOGON/LOGOFF Scheduler 
Vio Job Management 
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A Setting up the TMP STAE Exit 


TMP Mainline 


Terminal STAE TMP TCB 
Monitor Service 
2 Terminal Monitor Program Routine 


Program abnormally 
terminates, 


scb TMP STAE 


re Exit Routine 


STAE Processing 


TMP STAE Exit Routine 


SVC 13 


ai 


ABEND /STAE 
Interface Routine 


4G Schedules STAE 


Exit Routine 


ABEND Routine 


So 


5 Analyzes error 
Marks recoverable 
or unrecoverable, 


No 


t 
6 Attempts to retry the 


Cancel ABEND 


7 Continues ABEND 


Processing, 
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CROSS REFERENCE TABLE 


The TMP issues a STAE macro instruction that sets up TMP IK JEFTOI 
parameters for the STAE service routine. The STAE Initialization 

service routine builds a STAE Control Block (SCB) 

that contains the address of the TMP STAE exit routine. 


2 When an error occurs in any TMP routine, an ABEND 
(SVC 13) is issued, 


3 The ABEND routine checks the TCBNSTAE field of the 
TCB for the abnormally terminating task and, finding 
that a STAE exit is specified, passes control to the 
ABEND /STAE interface routine. 


@ The ABEND/SSTAE interface routine quiesces active ABEND/STAE 
|/O, purges ready I/O, and attempts to establish a interface 
work area, It then schedules the TMP STAE exit routine 
routine by issuing a SYNCH macro instruction, 


& The TMP STAE exit routine diagnoses the cause of the TMP STAE IK JEFTOS 6 
error and marks the error recoverable or not exit routine 
recoverable, 


6 |f the error is recoverable, the TMP is re-initialized, TMP STAE IKJEFTO7 6 


if necessary, and processing resumes, Retry 
Routine 


7 =f the error is not recoverable, control is returned ABEND 
to ABEND for abnormal termination processing, SVC 
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Section 3: Program Organization 


This section describes the organization of the terminal monitor program. 
It contains information about the hierarchy of the load modules, the 
assembly modules, and the control sections that constitute the program. 
Figure 7 is a graphic representation of this hierarchy. 


The module operation information briefly describes the processing 
operations that occur within each TMP rodule. 


For a summary of functions performed by subroutines, refer to the 
Directory in Section 4. 


Program Hierarchy 


The TMP has two load modules as shown in Figure 7. The TMP 
initialization routine (IKJEFT0O1) completes the logon process by setting 
up tables and control blocks and setting up the STAE, STAI and attention 
exit routines. The TMP mainline routine (IKJEFT02) obtains TSO 
commands, gives control to TSO command processors, and monitors their 
execution. 


The TMP consists of seven separate routines. They are: 


IKJEFTO1 - TMP initialization routine. 
IKJEFTO2 - TMP mainline routine. 
IKJEFTO3 - TMP attention exit routine. 
IKJEFTO4 - TMP STAI exit routine. 
IKJEFTO5 - TMP STAE exit routine. 
IKJEFTO6 - TMP message module. 
IKJEFTO7 - TMP STAE retry routine. 
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IK JEFTO] IK JEFTO2 


TMP Initialization 


IKJEFTO3 


TMP Attention 
Exit 


IK JEFTO4 


TMP STAI Exit 


IK JEFTOS 


TMP STAE Exit 


IK JEFTO6 


TMP Messages 


IK JEFTO7 


TMP STAE Retry 


TMP 
Initialization 


IKJEFTO6 


TMP Messages 


Load Module Names Normal Residence Approximate Sizes 
IK JEFTO! SYST.LINKLIB 2K bytes 
1K JEFTO2 SYST. LINKLIB 7K bytes 


TMP Mainline 
Routine XCTL Routine 
IK JEFTO2 
TMP Mainline 
IK JEFTO1 


Figure 7. Program Hierarchy: Terminal Monitor Program 
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Module Operation 


The following descriptions briefly describe the processing operation in 
each executable module of the TMP. 


IKJEFTO1 -- TMP INITIALIZATION ROUTINE 


Builds tables and work areas, sets up exit routines, builds the first 
element on the input stack, and initializes the command buffer before 
transferring control to TMP mainline IKJEFTO2. 


Gets main storage for the TMP work area. 

Sets up the environment control table (ECT). 

Sets up the TMP STAE exit. 

Sets up the TMP ATTN exit. 

Loads the TMP STAI exit routine. 

Loads the TIME command processor. 

Sets up the input stack. 

Gets main storage for the command buffer. 

Gets first command and places it in command buffer. 


IKJEFTO2 -- TMP MAINLINE ROUTINE 


Obtains a commandname, gives control to the appropriate command 
processor, waits for it to complete before obtaining another command. 
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Obtains first command from IKJEFT0O1, subsequent commands using 

PUTGET service routine. 

Checks commandname for validity using command scan. 

- if invalid, issues diagnostic message. 

- if null, obtains another command. 

- if question mark, sends any second-level messages queued by the 
last command processor using PUTLINE service routine. 

- if TIME, obtains running time for the terminal session by 
branching to the TIME command processor. 

- if TEST, allows the user to test a program by linking to the TEST 
command processor. 

Searches the user command library using a BLDL macro instruction to 

obtain the appropriate command processor. 

- if not found, the TMP assumes that the command processor is EXEC 
and that the invalid command name is a valid member name for use 
by the EXEC command processor. 

Abnormally detaches a previous command processor, if any. 

Attaches the appropriate command processor. 

Waits on an ECB list. The operating system dispatcher will give 

control to the appropriate command processor. 

On return from the dispatcher following a POST, does one of the 

following: 

- Detaches a normally completed command processor and gets another 
command. (CP ECB posted.) 

- Abnormally detaches a command processor and gets another command. 
(Attention ECB posted.) 

- Attempts to recover from error. (STAI ECB posted.) 

- Returns to LOGON/LOGOFF scheduler. (STOP/MODIFY ECB posted.) 
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IKJEFTO3 -- TMP ATTENTION EXIT ROUTINE 


Obtains command from attention buffer. Checks command syntax using 
command scan service routine. Prompts for valid command using PUTLINE 
and GETLINE. Special cases: 


e Time-Obtains running time for terminal session. 
_ @ Question mark-Sends messages to the terminal. Prompt for additional 
input using PUTLINE/GETLINE. 
e Null-returns to caller. 


Other commands: 
e Marks interrupted task non-dispatchable using STATUS STOP macro. 
e Moves new command into the TMPCMDWT field of the TMP work area. 
e Posts the TMP attention ECB. When the TMP gets control it will 
obtain the new command to replace the interrupted command. 


IKJEFTO4 -- TMP STAI EXIT ROUTINE 
Inform terminal that a task is termianting abnormally. 


If the command processor's STAE exit routine has marked the task 
unrecoverable, returns to the ABEND/STAE interface routine. 


If the command processor was executing under TEST when the ABEND 
occurred, posts the TMP STAI ECB. 


Otherwise: 
e Prompts the terminal for a command using STACK and PUTGET. 
e Posts the TMP STAI ECB. 
e Waits on STAI Exit ECB. 


If recovery successful, marks recoverable, returns to ABEND. 


If recovery unsuccessful, returns to ABEND. 


IKJEFTO5 -- TMP STAE EXIT ROUTINE 


Determines whether recovery is possible using branch table. If not 
possible, returns to ABEND/STAE interface routine with "no-retry” code. 
If possible, takes a SNAP dump of the user‘’s region if SYSABEND or 
SYSUDUMP was specified. Loads the STAE retry routine IKJEFTO7, and 
returns to the ABEND/STAE interface routine with a “retry"™ code. 


If the retry attempt by the TMP STAE retry routine fails, the TMP 
STAE exit routine is reentered from the ABEND/STAE interface routine. 
It again dumps the user's region if SYSABEND or SYSUDUMP was specified, 
detaches all subtasks and frees subpools 1-127 before returning to the 
ABEND/STAE interface routine. 


IKJEFTO7 -- TMP STAE RETRY ROUTINE 


Depends upon whether a retry has been attempted for this command 
processor. 


If no retry has been attempted, control is passed to TMP mainline 
IKJEFTO2 for a retry. 


If retry has been attempted, control is passed to IMP initialization, 
IKJEFTO1, for re-initialization of IKJEFTO2, 03, O04, 05, and 25. 
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Section 4: Directory 


This table eoncaias information that will help you find the appropriate program 


description or assembly listing. 


e The source code. 


e The executable load modules. 


e This manual. 


a a aaa aaa Pe ea ee ee eee a a a a a a aa 
i i | Load |Assembly|Control | 
{ |Module |Module |Section | 
| Label {Common Name| Name | Name | Name | Description 
| IKJEFTO1 | TMP IKJEFTO1 | IKJc#zFT01| 1IKJe£FTO1| Builds tables and work 
| Initial- | | Jareas, sets up exit 
ji zation | | | routines. 


| 
I KJEFTO2 | TMP 
{Mainline 


IKJEFTO3|TMP ATTN 
| Exit 


| 
IKJEFTO4|TMP STAI 

JExit 

| 

| 


I 
IKJEFTO5|TMP STAE 

| Exit 

| 


| 
AIKJEFTO6 | TMP 
|Messages 


| 
IKJEFT0O7| TMP STAE 
| Retry 


a ee ee ee ee ee ee 2 ee 2 ee ee ee ee eee oO 
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| | | 
IKJEFTO2 | IKJEFT02| IKJEFTO2|Gets commands, 


| | 
IKJEFTO3 | IKJEFTO3| IKJEFTO3| Handles ATTN reguest 
| | |directed to the TMP. 


| | | 

IKJEFTO2] IKJEFPTO4 | IKJEFTO4 | Intercepts abnormally 
| | {terminating command 
{ | |processors or program 
| | |tasks. 


| | | 

IKJEFTO2 | IKJEFTO5| IKJEFIO5| Intercepts abnormally 
| | jtermi nating TMP or TEST 
| | 


| command processor. 
| | | 
IKJEFTO1|IKJEFTO6| IKJEFTO6| Contains TMP messages. 
IKJEFT02| | | 


supervises 
jexecution of TSO command 
| processors. 


| | | 
IKJEFTO2| IKJEFTO7|IKJEFTO7|Deletes IKJ:EFTO2, 03 
}O04, 05 and 25. Transfers 
{control to IKJEFTO1 for 
|re-initialization. 


Pe ae se eae Ss 


-—_— — — 


= ee ee ee ee a A 
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ae ee ee oe ) ee 


+———-+ 


em me ee ee sn se ae ses 


It correlates information from three sources: 


Section 5: Data Areas 


This section describes the major data areas used by TMP routines, 
including: 


Command buffer (CBUF) 

Command processor parameter list (CPPL) 
Environment control table (ECT) 
Protected step control block (PSCB) 
Terminal attention exit element (TAXE) 
Terminal attention interrupt element (TAIE) 
Test parameter list (TPL) 

TMP parameter list 

TMP retry work area (TMPWA2) 

TMP work area (TMPWORKA) 

User profile table (UPT) 


For each data area, the following inforamation appears: 


Size in bytes. 

Name(s) of the routine(s) that creates it. 

Name(s) of the routine(s) that use and/or update it. 
Field names, displacements, size, and contents. 
Cross-references to method of operation diagrams. 
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COMMAND BUFFER (CBUF) 


Size: Variable. 
Constructed by: IKJEFTO1. 
Located in: Subpool 1. 
Updated by: IKJEFTO2 using PUTGET service routine. 
Used by: IKJEFTO2. 
Contents: Commands, subcommands, and/or operands. 
| Operat ion| 
{Diagrams | 
| 3 | 
SS= 555 = pa ee 
| Displacement] Field |Size in| i 
| Dec. Hex. | Name | Byte | Contents | 
|------------ $---------- $------- bana nnn nnn { 
{oO 0 | CBUFLNG { 2 |Length of command buffer | 
| | l | | 
|2 2 | CBUFOFF { 2 |Offset to data field | 
| | { | 
\4 4 |CBUFDATA | VAR |Commands, subcommands, and/or | 
l | | j operands. 
Ds aS i ee ee ee a ee eee J 
COMMAND PROCESSOR PARAMETER LIST (CPPL) J 
Size: 16 bytes. 
Constructed by: IKJEFTO1. 
Located in; Subpool 1. 
Updated by: Command processors. 
Used by: All command processors except the TEST command 
processor. 
Contents: Parameter List. 
Se 7 
loperation\ 
{Diagrams | 
| 3 | 
a a a a Ie Se i-______-_{ 
| Displacement] Field jsize int ; 
| Dec. Hex . | Name }Bytes | Contents | 
}------------}---------- }-------}-------------------------------------- / 
}o 0 [|CPPLCBUPF | 4 | #Command buffer (CBUF) H 
| | | | | 
{4 u | CPPLUPT ; 4 |}#User profile table (UPT) | 
| | | | 
|8 8 |CPPLPSCB | 4&4 | *Protected step control block (PSCB) | 
| | | | | j 
j1z c PCEPEEEE } 4 J}*Environment control table (ECT) | | 
ee em Pe! aed OS eM ener eed See SA ea es et ae cs ee J 
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ENVIRONMENT 
Size: 

Constructed 
Located in: 
Updat ed by: 


Used by: 


Contents: 


|Dec. Hex. 
| 0 2 
| 

| 

| 

| 

| 

| 

| 

{1 1 
| 

{4 4 
| 

|8 8 
| 

| 

| 

| 

| 

| 

| 

|9 9 
| 

| 

{12 Cc 
| 

| 20 14 
| 

| 28 1c 
| 

| 

| 

| 

| 

| 

ee oo accep oe ee 


by: 


+ 
| ECTRTCF 


ECTRTCD 


CTIOWA 


9 aS?) 


CTMSGF 


ECTSMSG 


ECTPCMD 


5) 


CTSCMD 


tx 


:CTSWS 


ECTNOPD 


eee er enn nn nnn nn mr a rn Ss ea eS ss ee Se eee ee eee 


CONTROL TABLE (ECT) 


40 bytes. 
IKJEFTO1. 
Subpool 1. 
routines. 


TSO command processors and service 


TMP and TSO command processors and service 
Routines. 


Information about the user’s environment in the 
foreground region. 


follows: 


Bit Meaning when on 
0 No parameters exist in command 


buffer. 


1 Reserved (0). 


Operation | 

|Diagrams | 

| 2 | 

Yr rn rr 4£-—---~——~— -{ 
|Size in| | 
[Bytes | Contents i 
+------- }-------------------------------------- { 
| 1 | ABEND Flags. Bit settings, as [ 
| | follows: [ 
| | | 
| | Bit Meaning when on | 
| {| OQ Command processor abnormally | 
| | terminated. | 
| | 1-7 Reserved (0). [ 
| | | 
|} 3 | Return code from ABEND [ 
| | | 
| 4 {*I/O service routine list (IOSRL). [ 
| | | 
ij 1 | Message Flags. Bit settings, as | 
| | follows: [ 
| | | 
| | Bit Meaning when on | 
| | O Delete second-level messages. { 
| | | 
| | 1-7 Reserved (0). | 
| | | 
| 3 | tSecond level message chain, or zero | 
{ [if no messages are chained. | 
| | | 
| 8 | Command Name | 
| | | 
j 8 | Subcommand Name [ 
| | | 
| 4 | ECT Switches. Bit settings, as [ 
| | 
| | [ 
| | | 
| | | 
| | | 
| | | 
| | | 
L J 


i= 


(Continued) 
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Saar aera ace ee ee Ua cre ne eS a en 1 
| Displacement| Field |Size in| | 
|Dec. Hex. | [Bytes | Contents | 
poseasste pe }+-—-—- fo nn nnn nnn nnn nnn nn nnn J 
| | ECTATRM | | 2 The TMP is terminating the | 
| | [ | command processor by using a | 
| | ; | DEACH macro instruction with a | 
| | | | STAE operand. | 
| | l | | 
| | ECTLOGF | | 3 LOGON or LOGOFF command processor | 
| | ; | has requested re-logon or logoff. | 
{ | | | | 
| | ECTNMAL | {| 4 No user messages at logon. | 
| | | [ | 
| | ECTNNOT | | 5S No system messages at logon. | 
| | | | | 
| | | | 6-7 Reserved (0). | 
| | | | | 
{29 1D |ECTDDNUM | 3 jCounter used by dynamic allocation SVC| 
| | | jryoutines when assigning temporary | 
| | | | ddnames. 
| l | | | 
| 32 20 =|ECTUSER | 4 |Reserved for installation. | 
l | | | 
| 36 24 | | 4 |Reserved (0). | 
eee eee etc y eae ee Po So Uc a ee J 
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PROTECTED STEP CONTROL BLOCK (PSCB) 


Size: 72 Bytes. 
Located in: Subpool 0. 
Created by: LOGON/LOGOFF Scheduler. 
Referenced by: TSO Command Processors. 
Contents: Information about a terminal user's job. 
aes ra | 
| Operation| 
| Diagrams | 
| 2 | 
aT Oech “eS Mee err ce ee a re tee ae ee fess aF 1 
|Displacement| Field [Size in| Contents | 
| Dec. Hex. | Name [Bytes | [ 
|------------ $---------- t-------}-------------------------------------- 
1/0 0 |PSCBUSER | 7 |User identification (padded right with| 
| | | jblanks). | 
| | | | 
| 7 7 |PSCBUSRL | 1 | Length of user identification. | 
| | | | 
| 8 8 |PSCBGPNM | 8 {Group name initialized by LOGON. | 
| | | 
[16 10 |PSCBATRI | 1 |User authorization flags. | 
| | | | | 
| | | {| Bit Meaning when on [ 
| | PSCBCTRL | | 0 Terminal user authorized to use | 
| | | | OPERATOR commands. { 
| |PSCBACCT | | 1 Terminal user authorized to use | 
{ | | | ACCOUNT commands. | 
| | PSCBJCL | | 2 Terminal user authorized to use | 
| { | | SUBMIT, CANCEL, STATUS, and | 
| | | | OUTPUT commands. | 
| | | | 3-15 Reserved (0). | 
| | | | | 
{17 11 | | 1 |Reserved for IBM use (0). | 
| | | | | 
{18 12  |PSCBATR2 | 1 | Installation attribute flags. | 
| | | | | 
{19 13 —C| | 1 |kReserved for installation use (0). { 
| | | | | 
| 20 14 |PSCBCPU | 4 | Cumulative CPU time used during | 
| | | | session. { 
| | | | a . | 
| 24 18 |PSCBSWP | 4 |Cumulative time resident in the | 
| | | | region. | 
| 
{28 1C  |PSCBLTIM | 4 JActual logon time of day. | 
| | | 
{32 20  |PSCBITCPU | 4 | Total CPU time used in this accounting| 
| | | Jperiod, excluding this session. | 
| | | | | 
| 36 24 |PSCBTSWP | 8 |Total time user job has been resident | 
| | | Jin region during this accounting | 
| | | |period, excluding this session. | 
es ee es fe ae eee epee nee RE lee es ee, epee areca J 


(Continued) 
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Ee eee 1 Spas aga clara Vig ge ee ee ee ee 7 
|Displacement |Field [Size in| Contents | 
| Dec. Hex. | |Bytes | | 
}------------ $---------- t-------}-------------------------------------- { 
[40 28 |PSCBICON | 8 {The total "connect" time for the user | 
| | | |during this accounting period, | 
i | [ |excluding the current session. | 
| | | | | 
[ | | |Note: All times are in 26.04166 | 
| | | Jmicrosecond timer units. | 
| | | | 
}44 2c |PSCcBTCO1 | 4 |Second word of PSCBTCON. | 
| | | | 
{48 30 |PSCBRLGB | 4&4 |t Relogon buffer. | 
| | | | 
{52 34 |PSCBUPT | 4 jt User profile table. | 
| | | | | 
{56 38 |PSCBUPTL | 2 jLength of UPT. | 
| | | | | 
[58 3A (| | 2 |Reserved for IBM, (0). | 
| | | | | 
| 60 3C =| PSCBRSZ |} 4 [Region size requested in 2K units. | 
| | | | 
{64 4Q |PSCBU | 8 |Reserved for installation, (0). { 
eee oe ere eee ee eee oa eee x Ce aly een at ae a J 
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TERMINAL ATTENTION EXIT ELEMENT (TAXE) 


Size: 144 bytes. 

Constructed by: IKJEFTO1 using the STAX macro instructions. 
Located in: Subpool 1. 

Updated by: STAX service routine 

Used by: Region control task (RCT). 

Contents: An interrupt request block (IRB), an interrupt 


queue element (IQE), and a work area used to 
schedule the attention exit when an attention 
interrupt occurs. 


(<= s-S— 7 
| 


Operation| 

[Diagrams | 

| 4 | 

SE as Vo ho ae SSS se 1 
| Displacement| Field |Size in| i 
| Dec. Hex. | Name |Bytes | Contents { 
----------- }----------}-------4—----------—----------------—--------} 
{0 0 |TAXEIRB | 96 | IRB | 
| | | | | 
| 96 60 |TAXENIQE | 4&4 |*Next available IQE [ 
| | | | | 
{100 64 |TIQELNK | 4 | tNext IQE | 
| | | : | 

{104 68 |TIQEPARM | 4 | tParameter to asynchronous exit i 
| | | | routine | 
| | | | | 
}108 6C | TIQEIRB | 4 | tIRB to schedule | 
| | | | | 
[112 70 | TAXETCB | 4 | *rTcB | 
| | | | | 
| 116 74 |TAXELNK | 4 | tNext TAXE | 
| | | | | 
{120 78 |TAXEXPSW | 4 | Left half of PSW for attention exit | 
{ | i | routine | 
| | | . . . 
j124 7C |TAXEEXIT | 4 | tAttention exit routine { 
| | | | | 
{128 80  |IAXESTAT | 1 | TAXE status flags. Bit settings, as | 
; { { | follows: | 
| | | [ . | 
| | | | Bit Meaning when on | 
| | | O Problem key. | 
| | | | 1 Problem mode. | 
| | | | 2 Requested TAXE. [ 
| | | | 3-7 Reserved (0). | 
| | | | | 
J129 81  |TAXEPARM | 3 |*STAX parameter list { 
| | | | | 
{132 84 |TAXETAIE | 4 | * TALE | 
| | | | | 
[136 88 |TAXEIBUF | 4 | tAttention puffer | 
| | | | | 
{140 8C |TAXEUSER | 4 |tUser parameter area | 
evecare eerste | eee eer ee ee Bee Oe ae ee Rear eae pene aS eee ee ne J 
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TERMINAL ATTENTION INTERRUPP ELEMENT (TAIE) 


Size: 72 bytes. 

Constructed by: IKJEFTO1 using the STAX macro instruction. 
Located in: Subpool 1. 

Updated by: Region control task (RCT). 

Used by: IKJEFTO3. 

Contents: Interrupt address and contents of general 


registers 0-15 when interrupt occurred. 


faa ee 7 
| Operation| 
{Diagrams | 


Cp 2 SEE : a a ia Ce ma a ea a a eee 4 
| Displacement] Field |Size in| | 
| Dec. Hex. | Name |Bytes | Contents | 


|------------ }---------- 
0 0 TAIEMSGL 


er am on ae oa on en Oe © = © Ow © = ee Ow ow oe es 2 ee ee 2 ee 2 2 2 2 ss 2 eee 


2 | Length in bytes of a message placed in| 
Jan input buffer specified by the STAX | 
J|macro instruction. If no input buffer | 
Jis specified, the field is 0. 
| 

1 |Return code from TGET macro 
Jinstruction issued py attention 
| prologue routine in the region control 
jtask (RCT) and checked by attention 
| exit routine IKJEFT0O3. 


NS 
N 


| 

1 | Reserved(0). 
| 

iy | Interrupt address. Right half of the 
jinterrupted PSW. Address at which TMP 
[mainline IKJEFT0O2 (or a previous 
Jattention exit routine) was 
| interrupted. 
| 

64 | Contents of general registers 0-15 of 
jinterrupted programs. 


+. W 
£ 


TAIEIAD 


ee rs ee ee 
fe ee ee ee ee ee ee SS ee Se ee ee ee ee he 


heme cme ees ee ee ee ee ee oe ee ee ee ee 


| 
| 
| 
| 
| 
| 
{ 
- 
| 
| 
t 
t 
| 
| 
1 
! 
! 
| 
! 
| 
1 
! 
[ 
[ 
! 
| 
| 
| 
| 
| 
| 
| 
! 
{ 
! 
| 
! 
| 
{ 
| 
| 
! 
[ 
| 
| 
| 
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TEST PARAMETER LIST (TPL) 


Section 5: Data Areas 


Size 60 Bytes. 
Constructed by: IKJ&FTO1. 
-Located in: Subpool 1. 
Updated by: TEST command processor. 
Used by: TEST command processor. 
Contents: Addresses of data areas used by TEST command 
processor. 
Sea aa aac ea 
| Operation | 
|Diagrams | 
| 1,5 | 
(Se {-252=--5 = , a an nea ro eee ee eee Tass { 
| Displacement |Field |}Size in| | 
|Dec. Hex . | Name {Bytes | Contents | 
|------------ }--—--~---- fan pon nnn nnn nnn nn nnn nnn 4 
| o 0 | TPLCBUF } 4 {| tCommand buffer i 
| | | | | 
{4 4 | TPLUPT | 4 | tUPT | 
| | | | 
| 8 8 | TPLPSCB {| 4 | tPSCB | 
| | | | | 
J12 Cc | TPLECT |} & | tECT | 
| | | 
| 16 10 |TPLTBUF | 4 | tTEST buffer | 
| | | 
| 20 14 =|TPLCTCB } 4 {tAttached command processor's TCB | 
| | | 
{24 18 |TPLSTAI | 4 | *TMP STAI exit routine { 
| | | | | 
| 28 1C |TPLSPLS ; 4 | tSTAI parameter list ; 
| | | 
{32 20 |TPLNECB | 4 | tECB for an abnormally terminating { 
| ; { | command processor | 
| | | | | 
(36 24 =%|TPLNTCB | 4 |*TCB for an abnormally terminating | 
| | | | command processor | 
| | | | | 
| 40 28 =|TPLMECB ; u | *STOP/MODIFY ECB | 
| | | | 
| 44 2C |TPLCECB i; 4 | tAttached command processor's ECB | 
| | | | | 
[48 30 |TPLIECB | 4&4 |*TMP STAI ECB | 
| | | | | 
{52 34 |TPLAECB } 4 | *IMP attention ECB | 
| | | | | 
{56 38 |RESV | 4 |Reserved (0). | 
a eee 1 eee | eee eee i Be akc TN ee et ee J 
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TMP PARAMETER LIST 


Size: 8 bytes. 
Constructed by LOGON/LOGOFF Scheduler or TMP STAE retry 
routine IKJEFTO7. 
Located in: Subpool 1. 
Updated by: IKJEFTO7. 
Used by: IKJEFTO1. 
Contents: Parameter list for TMP initialization routine 
IKJEFTO1. 
| Operation| 
|Diagrams | 
| 2 
i a Me re ere ee eae pe a ea sealer | 
| Displacement | Field {Size in| | 
|Dec. Hex . | }Bytes | Contents | 
}------—----- +-------—-- +-——---- }~------------------------------------- { 
{Oo 0 | FSTCMD ; 4 J} *First command or X‘'FFFFFFFF' if a { 
i | | | STAE retry is in process. | 
l | | | | 
14 4 |RETRYWAP | & }*TMP retry work area (if a STAE retry | 
| | | | is in process). | 
oa eye arene ere nana yar ase ree | neers a J 
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TMP RETRY WORK AREA (TMPWA2) 


Size: 16 bytes. 

Constructed by: IKJEFTO1. 

Located in: Subpool 1. 

Updated by: IKJEFT0O5, IKJEFTO7. 

Used by: IKJEFTO1. 

Contents Information to be used when re-initializing the 


TMP during STAE retry processing. 


ere aa aes 1 
| Operation| 
| Diagrams | 

2 | 
een era rer og Tose Povtcegeers rie hog ee ee ee a { 
| Displacement | Field |Size in| | 
| Dec. Hex . | Name |Bytes | Contents [ 

}~----------- t---------- }-~----- {~----------—------------------------- { 

10 0 |TMPWAPTR | 4 |*TMP work area. | 

| | | | 

| 4 4 | SAVAPTR | 4 | tOriginal register save area. | 
| | | | | 

{8 8 | RETRYFP | 4 | tRetry flags. | 

| | | | . . | 

112 C JRETRYFLG | 1 | TMP Retry Flags. Bit settings, as ; 

| | | | follows: | 

| | | . | 
| | | [Bit Meaning when on | 
| {TMPRINIT | ae Reinitialization is in progress. | 
| | TMPRTRY | {1 Retry is in progress. | 
| | | | | 
| [ | |2-7 Reserved (0). | 
| | | | | 

[13 Ds | | | 

| | | 3 |Reserved (0). | 

be ee ; etn | a en ne a a en ere eee ee J 
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TMP WORK AREA (TMPWORKA) 


Size 462 Bytes. 

Constructed by: IKJEFTO1. 

Located in: Subpool 1. 

Updated by: IKJEFTO02, IKJEFTO3, IKJEFTO4, IKJEFTOS, 
IKJEFTO7. 

Used by: IKJEFTO2, IKJEFT0O3, IKJEFTO4, IKJEFTOS, 
IKJEFTO?7. 

Contents: Control information and addresses of data areas 


used by the terminal monitor program. 


fo oe 1 
| Operation | 
|j|Diagrams | 
| < | 

eo | a aes ; es ato a a ae a { 

| Displacement |Pield {Size in| | 
|Dec. Hex. | Name {Bytes | Contents | 
~—=---=--==---—---———- $-—-----}-~--~-~------------------------—------| 
| 0 0 {TPL | 60 jTest parameter list. | 
| | | 

| 60 3c |TMPNECB | 4 | *TMP STAI ECB. | 
| | | | 
| 64 40 |TMPCECB | 4 |] *Attached command processor's ECB. | 
| | | | 

{68 44 |TMPIECB ; 4 J|ECB for STAI Post. [ 

| | i 
| 72 48 |TMPAECB | 4 [ECB for attention post. | 

3 | | | | 

| 76 4C |TMPCMDWr { 4 | *Command passed from TMP attention | 

| | ; } exit routine. | 
| | | | | 
|80 50 |TMPTIME | 4 |*Time routine | 
| | | | | 
|84 54 |TMPSWS | 4 [TMP internal switches. Bit settings | 
| { | Jas follows: [ 
| | | | . | 
| | i [Bit Meaning when on | 
| | TMPTEST | | 0 TEST program in control. | 
| | TMPCMDW [ {1 Command waiting. ] 
| | TMPNFCMD | {2 First command is processed. | 

; {|TMPACTRL | | 3 TMP attention exit is in control. | 

{ [| TMPSCTRL | [4 TMP STAI exit is in control. H 

eee eee Oey (eee em meee | eneeeres ene ER ae ae ee ete NI sre ME ee cle ery ee J 


(Continued) 
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|Dec. 


RO 
NM 
B= 


tO 
tw 
co 


NO nw 
Wo) oe) 
Cc fo) 


ee 
ee) ; N 
(=) WwW 
oO BO 


Hex. 


| 

| MULTLST 

I ieee 
meabaee 


| 
| TMPZEROS 


recoue 
| ARCODE 
fone 
SeKBRIE 
naemeuene 


| 
| CPPLPTR 


| ASRPLPTR 
oma pie 
loreueie 
aneaen 


| 
| BLDLLIST 


Bytes 


Multilevel messages list. 


ATTN message list. 


ATTN service routine parameter 


Dummy command buffer. 


tATTN return code save area. 
Scan flags. 

ATTN scanflags. 

*tATTACH parameter list. 


¢*Command processor parameter 


| 
4 
| 
| 
| 
| 
| 
| 
| 
| 
| Return code save area. 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| (CPPL). 
| 
| 


¢*Dynamic allocation. 
|*GETLINE parameter list. 
heucens parameter list. 
eorene parameter list. 
i MODE message. 


[*SCAN answer area. 


|*ATTN SCAN answer area. 
| 


area. 


list 


|*Service routine parameter list. 


|*t ATTN service routine parameter list. 


|*STAX parameter list. 


| 
| *STACK parameter list. 


Section 5: 


Data Areas 
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USER PROFILE TABLE (UPT) 


Size: 16 Bytes. 
Located in: Subpool 0. 
Created by: LOGON/ LOGOFF scheduler. 
Updated by: PROFILE command processor. 
Referenced by: IKJEFT45, IKJEFT56. 
Contents: Information about terminal user. 
aie. 
| Operation | 
|Diagrars | 
en 
| 2 | 
RRR eae hae i Na alias ee ee ae 1 
Displacement | Field |Size in| | 
|Dec. Hex. | Name {Bytes | Contents | 
}------------ f--——-- ff $n nnn nnn nnn nn nnn nn nnn nnn nnn { 
0 0 |[=e=24S== 2 |Reserved (0). 


+ 

| | | 
| | | | 
| 2 2 | UPTUSER | 10 | Reserved for installation use. | 
| | | | 
J12 Cc | UPTSWS |} 1 |User environment switches. Bit | 
; | [ |settings, as follows: | 
| | | | | 
| | l |Bit Meaning when on | 
| | | | 0 Reserved (0). | 
l | | | | 
| | UPTNPRM | j1 Prompt; if zero, nO prompt. | 
| | | | | 
| | UPTMID [ | 2 Message identifiers; if zero, | 
| | | | message identifiers will be | 
| | | | removed. | 
| | | | a | 
| | UPTNCOM | | 3 No user communication using the | 
| | ; | SEND command; if zero, user | 
| | [ | communication is allowed. 
| | { | | 
| | UPTPAUS | | 4 PAUSE was specified; if zero, | 
| | | | NOPAUSE was specified. | 
| | | | | 
| | UPTALD ; {5 Attention is a line delete | 
| | | | character; if zero, attention is | 
| | [ | not a line delete character. | 
| | | | | 
| | i |6-7 Reserved (0). | 
| | | | | 
{13 D | UPTCDEL ; 1 | Character delete character. | 
| | | | | 
j14 E | UPTLDEL j 1 | Line delete character. | 
| | l | | 
{15 F | -------- | 1 |Reserved (0). | 
a ae nee mene ot Ms ee ee 1 eae ere L | 
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Section 6: Diagnostic Aids 


This section contains the following information: 


e Messages (Figure 8) -- a list of messages issued by TMP routines. 


e Register Usage (Figure 9) -- a summary of the use of general 
registers 0-15. 


e Return Codes (Figure 10) -- a summary of return codes and their 
meanings. Unless otherwise specified, return codes are contained in 
register 15. 


Other useful diagnostic information is contained in the TMP work area 
(TMPWORKA) and TMP retry work area (TMPWA2). These data areas are 
described in Section 5. 


ia area Me ee cate eA em ee en eek sigh Fee Tyee Me Ge ee eg yg es see pa argre  ooe S 1 
|Message ID| Message | Issued by | 
~=-------- }-----------------------------------4---------=---=----- ===" 
| IKJ56621I | INVALID COMMAND SYNTAX | IKJEFTO2, IKJEFTO3, 
~---------}-—------------—------——-—----—- {~---—--—-~------------- 
| LKJ56622I | COMMAND NOT FOUND | IKJEFTO2 | 
‘qimiSoin Sanit fr ee ee Dee ee { 
| | READY | IKJEFT02, IKJEFTO3, | 
SSP STs a | aa eng Ag Ss ¢-----------------------f 
| IKJ566411I | command ENDED DUE TO ERROR+ | IKJEFT02/TEST T 
}---------- SESE GSPN nig NES on Gee ae FSi aap { 
|IKIJ5664I |System User ABEND CODE xxxx | IKJEFTO2/TEST | 
|---------- }--- noo nn nnn nnn nnn toni anno nnn en : 
| IKJ56600I | COMMAND SYSTEM ERROR | IKJEFTOS | 
et ae pr ee eer eee 
| IKJ56601I | COMMAND SYSTEM RESTARTING DUE | IKJEFTO5 | 
| |TO CRITICAL ERROR | ] 
So ae 
JIKIJ566021I | COMMAND SYSTEM RESTARTING DUE | IKJEFTO5 | 
| | TO ERROR | [ 
ee ee ee ee ee ee ho Se a ee oe oe ae m | 


Figure 8. Messages: Terminal Monitor Program 
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(IT aseetTey ZSA) weaborg AOYTUOW [euTWAaL ZSA/SO 


Zz 
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-+ 
m Be wW La) 
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IK JEFTOI IK JEFTO2 IKJEFTO3 IK JEFTO4 IK JEFTO5 IK JEFTO7 


{ Command f Attention 4 Work area or 4 Work area or STAE parameter 
buffer Exit ABEND code (2) ABEND code (2) f list 
parameter list parameter list 
Work Register Ea | Work Register Lad 
Work Register —s Work Register hae 
Work Register Work Register poe 
: W ORK- WORK- 
Work Register APTR A TMP work area APTR 


f Register save 


A Return point 4 Return point ia | A Return point 
! Entry point/ f Entry point/ 
> ee point 1) Rho return point 3) 


@) If entry is from q) 0 - No change to q) 0 - 1/0 quiesed (2) Depends on entry code 
IKJEFTO7, the buffer program flow 4-1/0 halted 
length field is 0 4 - Address of next 8 - No I/O (G) 0 - Retry 

executable 12 - No work area 4 - No retry 

instruction (4) If no work area was obtained (RO=12) 


Register 


R2 


Work Register 


R3 Work Register 


. 
R5 Work Register Work Register 
nea Te peace 
Work Register seearwe' mii 
oe ATMP work area 
wrk Register | Work Register 
foaaiee 8 Sea 


Rea} ; 
R13 t egister save pis. Register save 
Re ap 


area 
-- A Return point) 


R13 
R15 fo point/ R15 
return code 2) 


Q) In LOGON/LOGOFF 


scheduler 


0 - Normal 
4 - Unable to open 
command library 


—> 
RS 
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Q uv 
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a 
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Figure 9. Register Usage: Terminal Monitor Program 


c c 


Return Code 
Hexadecimal Meaning 
101 


IK JEFTOI 


BLDL Error, 


102 DAIR Error. 

103 PUTLINE Error. 

104 STACK Error, 

105 STAX Error. 

Note: These are error exit (user ABEND) codes used by IKJEFTO! when going to IKJEFTOS. 

IK JEFTO2 201 BLDL Error, 

202 DAIR Error. 

203 PUTLINE Error, 


STACK Error, 
STAX Error, 


These are error exit (user ABEND) codes used by IKJEFTO2 when going to IKJEFTOS. 


IKJEFTO3 No change is made in program flow, 
poe For change in program flow. 
instruction 
to be 
executed, 
IK JEFTO4 Unrecoverable error. 
Recoverable error. 


IK JEFTOS Retry is not to be attempted. 


Retry is to be attempted. 


IKJEFTOS 


IK JEFTO7 


Figure 10. Return Codes: Terminal Monitor Program 
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Part 2: Terminal I/O Service Routines 
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Section 1: Introduction 


The terminal I/O service routines handle terminal input/output 
operations required by the LOGON/LOGOFF Scheduler, the terminal monitor 
program, the TSO command processors, and other TSO problem programs. 


There are four terminal I/O service routines: 


e STACK -- which determines the current source of input: (1) from the 
terminal, or (2) from an in-storage list. 

e GETLINE -- which obtains a line of input from the terminal or from 
the current source of input. 

e PUTLINE -- which sends line(s) of data to the terminal, formats 
messages and sends them to the terminal. 

e PUTGET -- which sends a message to the terminal and obtains a line 


of input from the current source of input. 


The terminal I/O service routines can be invoked directly (by using 
the LINK or LOAD/CALL macro instructions) or they can be invoked using 
system macro instructions: STACK, GETLINE, PUTLINE, and PUTGET. 


There are two forms of these macro instructions: the list form and 
the execute form. The list form generates most of the control blocks 
and parameter lists required, while the execute form generates 
executable code that includes a LINK SVC instruction. The LINK SVC 
results in a branch-and-link-register instruction to the appropriate 
entry point. 


For further information about the terminal I/O macro instructions, 


refer to OS/VS2 TSO Guide to Writing a Terminal Monitor Program or a. 
Command Processor, GC28-©48. 


As supplied with TSO, the terminal I/O service routines reside in 
SYS1.LINKLIB and will execute in the user's foreground region with the 
protection key assigned to that region. The installation may choose to 
make the terminal I/O service routines resident in the TSO link pack 
area (TSLPA) in the region assigned to the Time Sharing Control Task 
(TSCT). 
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Section 2: Method of Operation 


This section describes the method of operation of the terminal I/0 
service routines. It includes the following method operations diagrams: 


e Method of Operation Diagram 7: Terminal I/O Service Routines, 
Overview -- which shows how the terminal I/O service routines are 
used by the terminal monitor program, TSO command processors, and 
other TSO problem programs. 


e Method of Operation Diagram 8: STACK Service Routine -- which shows 
how the STACK service routine determines the current source of input 
(1) from the terminal, or (2) from an in-storage list. 


e Method of Operation Diagram 9: GETLINE Service Routine -- which 
shows how the GETLINE service routine obtains a line of input from 
the terminal or from the current source of input. 


e Method of Operation Diagram 10: PUTLINE service routine -- which 
shows how the PUTLINE service routine sends line(s) of data to the 
terminal, formats messages, and sends messages to the terminal. 


e Method of Operation Diagram 11: PUTGET service routine (Command 
Mode) -- which shows how the PUTGET service routine obtains commands 
from the current source of input. 


e Method of Operation Diagram 12: PUTGET service routine (Prompting 
Mode) -- which shows how the PUTGET service routine obtains operands 
and data from the terminal in response to a prompting message. 


Each method of operation diagram includes a cross-reference table to J 
help you find the appropriate assembly listing. 


Overview 


Method of Operation Diagram 7 shows how the terminal I/O 
service routines are used by the terminal monitor program, the TSO 
command processors, and other TSO problem programs. 


Briefly, here is what happens: 


e The terminal monitor program uses STACK to set up the first (bottom) 
element on the input stack to define the terminal as the current 
source of input. Later, the TMP uses PUTGET to obtain commands from 
the terminal and uses PUTLINE to write informational messages to the 
terminal. 


e TSO command processors may use STACK to set up other elements on the 
input stack to define either the terminal or an in-storage list as 
the current source of input. TSO command processors use PUTGET to 
obtain subcommands, GETLINE to obtain data, and PUTLINE to send data 
or informational messages to the terminal. 


e When a TSO command processor or problem program begins to terminate 
abnormally, the command processor uses STACK to delete all elements 
from the input stack (except the bottom element). 


e Other TSO problem programs, including parse and other TSO service 
routines, may use any or all of the terminal I/O service routines. ) 
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INPUT STACK 


The input stack is a variable-sized control block that contains one or 
more elements, each of which defines a source of input: 


e From the terminal, or 
' @ From an in-storage list. 
There are two types of in-storage lists: a source list and a 


procedure list. A source list contains source language statements or 
data. A procedure list is a list of TSO commands. 


I/O SERVICE ROUTINE LIST 


element (a terminal element) and the top element (a terminal element or 
a storage element). The top element defines the current source of 
input, while the bottom element always describes the terminal as a 
source Of input. 


The I/O service routine list (IOSRL) contains the address of the bottom 2, 


The GETLINE and PUTGET service routines refer to the IOSRL to 
determine the current source of input, but they cannot update it. Only 
STACK can update the IOSRL and the input stack. 


STACK Service Routine 

Method of Operation Diagram 8 shows how the STACK service routine 
creates the I/O service routine list (IOSRL) and input stack (INSTACK) 
and adds or deletes elements to or from the input stack. 

ENTRY TO STACK 

STACK is the entry to by a branch and link to entry point IKJSTCK in 
load module IKJPTGT. The calling program may invoke STACK directly, by 
issuing a LINK macro instruction, or indirectly, by issuing a STACK 
macro instruction which results in a LINK SVC. 

On entry to STACK , register 1 points to the I/O parameter list 
(IOPL) which contains the address of the STACK parameter block (STPB). 
MANAGING THE INPUT STACK 
STACK performs one of the following functions: 

e Adds an element to the top of the stack. 

e Deletes an element from the top of the stack. 

e Deletes the current procedure element from the stack. 

® Deletes all elements from the stack except the bottom element. 
Before adding an element to the stack, STACK checks to see if storage 


is available and, if necessary, obtains storage for a new input stack 
that is 32 bytes larger than the current one. 
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If STACK is to delete a procedure element but the top element is not 
a procedure element, STACK deletes all elements from the top of the 
stack down to and including the first procedure element, until it 
reaches the bottom element. 


STACK updates the IOSRL to point to the top and bottom elements or 
the Input Stack before returning control to the calling program. 


RETURN TO CALLING PROGRAM 


STACK issues a RETURN macro instruction to return control to the calling 


program. At exit from STACK, register 15 contains one of the following 
return codes: 


{ 
| xX'0O0O* |{Normal. Element(s) added to or deleted from the input stack. | 
[| xX*O4* |Error. Invalid input to STACK. Either an invalid operation | 
| 


{code or an invalid record in a in-storage list. 
ee eon tra Et ee 4 


GETLINE Service Routine 


Method of Operation Diagram 9 shows how the GETLINE service routine 
obtains lines of input from the terminal or from the current source of 
input, which may either be the terminal or an in-storage list. 


ENTRY TO GETLINE ) 


GETLINE is the entry to by a branch and link to entry point IKJEGTL in 
load module IKJPTGT. The calling program may invoke GETLINE directly, 
by issuing a LINK macro instruction, or indirectly, by issuing a GETLINE 
macro instruction which results in a LINK SVC. 


On entry to GETLINE, register 1 points to the I/O parameter list 
(IOPL) which contains the address of the GETLINE parameter block (GTPB). 


OBTAINING LINES FROM THE TERMINAL 


If terminal is specified, or if the terminal is the current source of 
input, GETLINE obtains a physical line or a logical line of input from 
the terminal using the TGET macro instruction. A physical line is a 
line of input entered from the terminal. A logical line may consist of 
one or more physical lines, where ‘-* is the continuation character. 


OBTAINING LINES FROM A LIST 


If the current source of input is an in-storage list, GETLINE obtains 
the next record and calls STACK to update the I/O service routine list 
({IOSRL). If end-of-data is reached, GETLINE calls STACK to delete the 
current element from the input stack. 
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RETURN TO CALLING PROGRAM 


GETLINE returns control to the calling program by a branch on register 
14. At exit from GETLINE, register 15 contains one of the following 
return codes: 


FN ee OE ei Pe eC et ep ee ee eta 
a Code | Meaning | 
| X*0OO° |Normal. Line of input obtained from the terminal. | 
| xX*0O4° |Normal. Line of input obtained from an in-storage list. | 
| X°0O8°* |Error. Communications ECB‘'s post bit was on or user was | 
| | disconnected. | 
| xX‘'OC* |Error. NOWAIT was specified as a TGET option and no buffer | 
[ [was available to TGET. | 
{| %X°10° |Normal. EOD returned from an in-storage list. | 
| X*14* |Error. Invalid parameters to GETLINE or TGET. | 
| %*°18° |Error. A conditional GETMAIN was executed and no space was | 
| | available. | 
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PUTLINE Service Routine 


Method of Operation Diagram 10 shows how the PUTLINE service routine 
sends lines of data to the terminal, formats messages, and sends 
messages to the terminal. 


ENTRY TO PUTLINE 


PUTLINE is entered by a branch and link to entry point IKJPUTL in load 
module IKJPTGT. The calling program may invoke PUTLINE directly, by 
issuing a LINK macro instruction, or indirectly, by issuing a PUTLINE 
macro instruction which results in a LINK SVC. 


On entry to PUTLINE, register 1 points to the I/O parameter list 
(IOPL) which contains the address of the PUTLINE parameter block (PTPB). 


SENDING MESSAGES TO THE TERMINAL 


PUTLINE formats messages and sends them to the terminal using the TPUT 
Macro instruction. Messages are formatted by joining message segments, 
if necessary, and stripping off message identifiers, if specified. (If 
“format only" was specified, PUTLINE formats the message but does not 
send it to the terminal.) Second-level messages, if supplied, are 
chained to the ECTSMSG field of the environment control table (ECT) 
where they are available to the PUTGET service routine when the terminal 
user enters a question mark to request additional information. 


SENDING DATA TO THE TERMINAL 
PUTLINE sends data to the terminal (as received from the calling 


program) using the TPUT macro instruction. Each line of chained, 
multi-lined data is sent to the terminal until end-of-chain is reached. 
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RETURN TO CALLING PROGRAM 


PUTLINE returns control to the calling program by a branch on register 
14. At exit from PUTLINE, register 15 contains one of the following 
return codes: 


= = a ae a Re eo Ae eee OO Ee eS Ee ED 1 
Meaning | 


e Line(s) of output were sent to the terminal. 
e Message(s) were sent to the terminal and second-level 
messages were chained. 
| e Text was inserted (format only was specified). 
X'O4* | Error. Communication ECB's post bit was on. 
X'08" |Error. NOWAIT was specified as a TPUT option and no buffer 
{was returned by TPUT. 
X*OC* |Error. Invalid parameters were sent to PUILINE. 
X'10° |Error. A conditional GETMAIN was executed and no space was 


javailable. 
a a a a se ate ee a ee a 


| 
X*0O"° |Normal. One of the following has occurred: 

| 

| 

| 
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PUTGET Service Routine 


The PUTGET service routine has two very different uses: 

e Obtaining commands (Command Mode). 

e Obtaining operands and data (Prompting Mode). 
ENTRY TO PUTGET 
PUTGET is entered by a branch and link to entry point IKJPTGT in load 
module IKJPTGT. The calling program may invoke PUTGET directly, by 
issuing a LINK macro instruction, or indirectly, by issuing a PUTGET 
macro instruction which results in a LINK SVC. 

On entry to PUTGET, register 1 points to the I/O parameter list 
(IOPL) which contains the address of the PUTGET parameter block (PGPB). 
OBTAINING COMMANDS 


Method of Operation Diagram 11 shows how the PUTGET service routine 
obtains commands from the current source of input. 


If the current source Of input is the terminal, PUTGET sends a mode 
message to the terminal and obtains a line of input from the terminal. 
Examples of mode messages are: 


Mode Message Routine 


READY Terminal monitor program 
EDIT EDIT command processor 
TEST TEST command processor 


If the current source of input is an in-storage list, PUTGET obtains a 
line of input fron the in-storage list. When end-of-data is reached, 
PUTGET invokes STACK to delete the current procedure element. If the 
line begins with a question mark, PUTGET sends a second-level message to 
the terminal and obtains another line of input. (This process can 
continue until all second-level messages have been sent to the 
terminal.) 
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OBTAINING OPERANDS AND DATA 


Method of Operation Diagram 12 (foldout) shows how the PUTGET service 
routine obtains operands and data from the terminal in response to a 
prompting message. 


If the current input source is an in-storage list, or if the terminal 
user has specified "NO PROMPT" as one of his PUTGET options, an error 
return code is returned to the calling routine. 


If the current source of input is the terminal, PUTGET sends a 
prompting message to the terminal and obtains a line of input from 
terminal. Examples of prompting messages are: 


Prompting Message Routine 
ENTER USERID - LOGON/LOGOFF Scheduler 


REENTER - Parse service routine 


If the line begins with a question mark, PUTGET sends a second-level 
prompting message to the terminal (if one is available) and obtains 
another line of input. (This process can continue until all 
second-level messages have been sent to the terminal.) 


RETURN TO CALLING PROGRAM 


PUTGET returns control to the calling probram by a branch on register 
14. At exit from PUIGET, register 15 contains one of the following 
return codes: 


T . 
| 1 3 ! 
| X*00O° |Normal. PUTGET sent a line to the terminal and received a | 
{ jline from the terminal. | 
| %X°'O4" |Normal. PUTGET sent a line to the terminal and received a [ 
{ {line from an in-storage list. | 
} X*°0O8° |{Error. The communications ECB's post bit was on. | 
| xX*OC* |Error. If in command mode -- NOPAUSE was specified and input| 
| jwas from an in-storage list. If in prompting mode -- i 
| | NOPROMPT was specified or input was from an in-storage | 
| | procedure. | 
{ %X°10° |Error. NOWAIT was specified as a TPUT option and no TIOC | 
| | buffer was available to TPUT. I 
| °14*" |Error. NOWAIT was specified as a TGET option and TGET | 
| {returned no buffer. | 
} %X°18° |Error. PUTGET received invalid parameters. | 
{| xX*1c* |Error. For conditional GETMAIN. No space was available. | 
| javailable. | 
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Method of Operation Diagrams 
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CROSS REFERENCE TABLE 


The LOGON/LOGOFF Scheduler uses STACK to set up the first (bottom) element to describe the 
terminal as the current source of input and uses other I/O Service Routines for terminal |/O. 


The TMP uses STACK to set up the first (bottom) element to describe the terminal as the current 
source of input. This first (bottom) element is never removed, 


The TMP uses PUTGET to obtain commands. (an exception: The TMP Attention Exit Routine uses 
PUTLINE and GETLINE to obtain commands from the terminal, This is done because GETLINE 
optionally gets a line directly from the terminal, while PUTGET always gets a line from the 
current source of input.) 


The TMP uses PUTLINE to write error messages. 


The TSO command processors may use STACK to set up in=storage lists. There are two kinds of 
in-storage lists: source (data), and procedure (TSO commands). 


TSO command processors use PUTGET to obtain operands and subcommands, (Subcommand 
processors use PUTGET to obtain their operands.) 


TSO Command processors use GETLINE to obtain data and use PUTLINE to write first and second 
level messages to the terminal or to write data to the terminal, 


Other TSO problem programs may use any or all of the Terminal I/O Service Routines if they share 
subpool 78 and use the proper parameter lists, 
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INPUT PROCESSING RESULT 


STACK Service Routine IKJSTCK 
From TSO Problem Program Creates and updates the Input 
Using STACK or LOAD/CALL Stack and IOSRL which define the 
Macro Instructions current source of input. 


Register | 


Sets up IOSRL and Input Stack 
or performs one of the 
following operations: 


; Input/Output 


Parameter List (IOPL) ADD ELEMENTS 


Adds an element to the top 
of the stack, 


User Profile 
Table (UPT) 
-OR- \ Update Top Element 


\ 


Environment Control 


Input Stack INSTACK 


Table ( ECT) 
Deletes an element from the Uieused 
Command top of the stack, \ \ DELETE ELEMENTS Sjoroge 
Processor's ECB \ \ } 
~ OR - | “Top 
Stack Parameter \ Element 
Block (STPB) Deletes a procedure element \| 
/ from the stack, \| /O Service 
/ Routine List lOSRL Crrer 
-OR - Elements 
4 Top Element 
Deletes all elements from the 
stack (except bottom element), t Bottom Element 
Element 


RETURN 


Element Code: 


Meaning when set 


Operation Code : A List Source Descriptor (LSD) for In-Storage List; 


Meaning when set 0 for a Terminal Element, 


Terminal element. 


Storage element, 
Reserved (0). 


Add one element to top of stack, 


INSTACK In-Storage List 
Pd 


Next 
Record 


Delete one element from top of stack. 


Procedure element; if 0, 
source element, 

List TSO commands to the 
terminal, 


Delete current procedure element. If top element 
is not a procedure element, delete all elements 
down to and including first procedure element. 


Delete all elements except bottom element. 
Reserved (0). 


Note: Storage is freed when STACK deletes one or more 
elements from the stack, 
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CROSS REFERENCE TABLE 


if the ECTIOWA field of the ECT is zero, STACK gets main storage for IK JEFT30 
the Input Stack and the IOSRL, STACK then checks the STACK options 
field of the STPB to determine the function requested, 


Before adding an element to the stack, STACK checks to see if space is 
available and, if necessary, gets main storage for u new stack that is 32 
bytes larger than the current stack, 


STACK deletes an element from the stack by freeing the LSD and DELETE 
in-storage list of any non-terminal element and changing the Top Element 
Pointer in the |OSRL to point to the next lower element, 


STACK finds the next procedure element on the stack and deletes it by 
freeing the LSD and in-storage. list of any non-terminal element and 
changing the Top Element Pointer in the IOSRL to point to the next lower 
element, Any elements above the procedure element are also deleted. 


STACK deletes all elements from the stack by setting the Top Element UNSTACK 
Pointer in the [OSRL to point to the first element in the stack and 
freeing the LSD and in-storage list of any non-terminal element, 
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INPUT ; PROCESSING RESULTS 
GETLINE Service Routine I[KJGETL 


Gets line(s) of input from terminal 
or from current source of 
input, 


From TSO Problem Program Using 
GETLINE or LOAD/CALL Macro 


Instruction 


4 Determines source of input: 


e@ From terminal 
OR 


@ From in-storage list, 


INSTACK 


Register | 


SUBPOOL | 


2 Obtains line(s) of input from 
the terminal, 

“If last character is '-' get 7 

another line, 


“ 


OR 


3 Obtains line(s) of input from 


—~ in-storage list, 
GETLINE Options A| B TGET Options 
4 Input Buffer 
RETURN 


A GETLINE Options B IGET Options Cc 


Bit settings that indicate the operation to Bit settings, as follows: The In-Storage List must have been placed on the Input 
he performed, as follows: Stack using the STACK service routine, 


Bit Meaning when set 


Bit Meaning when set 


Alwoys set for TGET, ; 
0-2 Reserved (0), Reserved (0) List Source 
3 The line of input is a physical eneee ° i Input Descriptor In-Storage 

line; if zero, it is a logical line. NOWAIT was specified; if Stack (LSD) 
The source of input is the te ae wos specified, 
terminal; if zero, it is as eserved (0). 
described by the top element the 
input stack, 


5-15 Reserved (0). 


ASIS was specified; if zero, ; 
EDIT was specified, RECORD 


Reserved (0). 
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CROSS REFERENCE TABLE 


Checks the GTPB to see if the source of input must be the terminal GETLINE IK JEFTS5 
regardless of the current source, If not, checks the Top Element Pointer 
of the IOSRL to determine the current source of input, 


If the terminal is the current source of input GETLINE gets a line of 
input from the terminal, If logical line processing is requested, 
GETLINE recognizes "-'"' as a continuation character (if it comes at 
the end of the line) and gets all physical lines contained in the logical 
line, 


if the current source of input is an in-storage list (Top Element Pointer 

points to List Source Descriptor), GETLINE gets the next record pointed 

to by a field within the List Source Descriptor (LSD) and updates the 

pointer to the next record, 

If an end-of-data is reached on a in-storage list, GETLINE links to the IK JEFT3O 
STACK service routine to delete an element from the stack. No line is 

returned to the calling program. 
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RETURN 


TPUT Options 


Bit settings that indicate the TPUT cpthons reque ted, 


as follows: 

Bil Meaning when set 
0 Always zero for TPUT. 
1-2 Reserved (0), 
: NOWAIT processing requesteu, 
4 HOLD processing requested, 
5 BREAKIN processing requested, 
6 CONTROL processing requested, 
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ASIS processing requested, 


(Part l of 2) 


werbetq uotyetado jo pouraw 


G8 


CROSS REFERENCE TABLE 


Key Description 


The PUT Options field is checked to determine the function requested. 


If the line contains data (bit 2 is set), PUTLINE sends data to the terminal 


If the data consists of multiple lines (bit 4 is set) then all lines are sent to the terminal. 


If the line contains a message (bit 2 is not set) and format only is specified (bit 10 is set), PUTLINE 
formats the message but does not send it to the terminal, as follows: 


e Formats the message, if necessary. 
PUTLINE sends an informational message to the terminal if the line contains a message (bit 2 is not 


set), format only was not specified (bit 10 is not set), and the second word of the PTPB (PARMAOUT) 
contains an address, PUTLINE: 


e Formats the message, if necessary, 

e Sends it to the terminal, 
If bit 5 is set, PUTLINE constructs a second-level message chain, as follows: 

e Formats the message, if necessary. 

e Chains 2nd level message to the second-level message chain whose origin is the ECTMSG 

field of the ECT. 

PUTLINE sends second-level messages to the terminal if bit 2 is not set, format only was not 
specified (bit 10 is not set), and the second word of the PTPB contains zero, PUTLINE: 


Sends all second-level messages to the terminal. If the ECTMSG field of the ECT contains 
the address of a second-level message chain, 


Sends a "NO INFORMATION AVAILABLE" message if the ECTMSG field of the ECT 
contains zero or if the ECTMSGEF bit is set. 


Frees the storage obtained for the second-level message. 


Zeroes the ECTMSG field, 
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INPUT PROCESSING RESULT 
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Bit settings that indicate the TPUT options 
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Bit settings that indicate the output operations 
to be performed by PUTGET, as follows: 


Bit Meaning when set 


0 Always set for TGET, 
1-2 = Reserved (0), 
3 NOWAIT processing requested. 
4-6 Reserved (0), 
7 

8- 


Bit Meaning when set 


0 = Always zero for TPUT. 

1-2 Reserved (0). 

3 NOWAIT processing requested, 
4 HOLD processing requested, 
5 
6 
7 


Bit Meaning when set 


Reserved (0), 
Not used in PUTGET, 


Bit Meaning when set 


Reserved (0), 
Reserved (0), 
Always zero for PUTGET, 
Single-level format, 
Always zero for PUTGET, 
Multi-level format, 
Always zero for PUTGET. 
Prompting message. 
Mode message. 
Reserved (0), 


Demand from terminal, 
15 Reserved (0), 


0 
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2 Not used in PUTGET, 
3 

4- 


ASIS processing requested, 


BREAKIN processing requested, 
15 Reserved (0), 


CONTROL processing requested, 
ASIS processing requested, 
8-15 Reserved (0), 
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5 
6 
7 
8 
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CROSS REFERENCE TABLE 


Command Mode is requested when bit 8 of the PUT Options field is set. (If bit 8 is zero, refer to 
Diagram 12 for Prompt Mode.) 


Checks the IOSRL to determine source of input, 


If the terminal is the current source of input, PUTGET obtains a command from the terminal, 
as follows: 


e Formats the output line in a buffer, if necessary. 


@ Sends the line to the terminal, 
e Gets a line from the terminal, 
If the line begins with a question mark ("?") : 


e Sends second-level messages to the terminal if the ECTSMSG field of the ECT contains 
the address of a second-level message chain. 


Sends "NO INFORMATION AVAILABLE " message if the ECTSMSG field of the ECT 


contains zero. 


Frees storage obtained for the second-level messages and zeroes the ECTSMSG field 
in the ECT. 


e Sends a line to the terminal, 


b) If the line does not begin with a question mark ("2"), return to caller, (If the line begins 
with another question mark, repeat step 3a), 


If an in-storage list is the current source of input, PUTGET obtains commands from the list, 
as follows: 


If the UPTPAUS bit is set in the UPT: 
e@ Sends PAUSE message to the terminal. 


e  Getsa line from the terminal, 


If the line begins with a question mark ("?"), sends second-level messages to the terminal as 
in step 3a. If line is a carriage return, deletes chain. Prompts user for proper message and 
repeats step 4a, 


Gets a line from the in-storage list. 
If EOD is returned from the in-storage list, repeats step 2, 


Lists the line if from an in~storage procedure with LIST specified. 


Method of Operation Diagram ll. 


PUTGET 


TEXTIN 
TERMOUT 


GETLINE 


CHAINOUT 


UNCHAIN 


TERMOUT 


PUTGET 


TERMOUT 
GETLINE 


GETLINE 
STACK 


IKJEFT45 


IK JEFT54 
IK JEFT56 


IKJEFT55 


IKJEFT52 


IKJEFT53 


IKJEFT56 


IKJEFT45 


IKJEFT56 
IK JEFT55 


IK JEFTSS 
IKJEFT30 


PUTGET Service Routine (Command Mode) (Part 2 of 2) 


DO 


88 


nian 


INPUT PROCESSING RESULT 


PUTGET Service Routine IKJPTGT 


From Parse Service Routine or other TSO problem 
program using PUTGET or LOAD/CALL macro 


instructions 


Obtains operands and data, 


1) Enters "PROMPT MODE", 


Register | INSTACK 


2. Returns if prompting is not possible. 


canst 


~OR- 


Input/Output Parameter List (IOPL 


ed 


ECT IOSRL 


SUBPOOL |] 
Obtains operands and dato. 


weaboirg AOQVUOW TeuTWASL ZSA/SO 


(T aseatTay ZSA) 


PUTGET Parameter Block (PGPB) 


PUT B TPUT 
Options Options 
4 Output Line Descriptor 
Message 
GET TGET Segments 
C Options D Options 


4 Input Buffer 


A PUT Options 


Bit settings that indicate the output 
operations to be performed by PUTGET, 
as follows: 


Bit Meaning when set 


Reserved (0), 

Reserved (Q), 

Always zero for PUTGET, 
Single-level format. 
Always zero for PUTGET. 
Multi-level format. 
Always zero for PUTGET. 
Prompting message. 
Mode message. 

Reserved (0), 


0 
? 
2 
3 
4 
5 
6 
7 
8 
y 
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O 


LD 


Secondary-Level 
Messages 


First-Level 
Message 


B TPUT Options 
Bit settings that indicuie the TPUT 
options requested, as follows: 
Meaning when set 


Always zero for TPUT, 
2 Reserved (0), 
NOWAIT processing requested, 


BREAKIN processing requested, 
CONTROL processing requested. 
ASIS processing requested, 


Bit 
0 
ye 
3 
4 HOLD processing requested, 
5 
6 
7 
8-15 Reserved (0). 


Sends out prompt message. 


Obtains a line from the 
terminal, 


If '? ' was received, 


Returns Input line to coller, 


RETURN 


@ GET Options 


Bit settings that indicate the input 
operations to be performed by 
PUTGET, as follows: 


Meaning when set 


Reserved (0), 
Not used in PUTGET. 
Not used in PUTGET, 


Demand from terminal, 


~15 Reserved (0), 


D TGET Options 


Bit settings t'.at indicate the TGET 
options requested, as follows: 


Bit Meaning When Set 


0 Always set for TGET. 

1-2 Reserved (0), 

3 NOWAIT processing requested, 
4-6 Reserved (0), 

7 ASIS processing requested, 
8-15 Reserved (0), 


(Part 1 of 2) 
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CROSS REFERENCE TABLE 


Key Description 


1 Prompt Mode is requested when bit 7 of the PUT Options field is set. 
(If bit 7 is zero, refer to Diagram 11 for Command Mode. ) 


PUTGET IKJEFT45 


IK JEFT45 


PUTGET 


2 If a command procedure is the current source of input, or if the UPTNPRM 
bit is set in the UPT, then PUTGET is unable to prompt ond returns an 
error return code, 


If the terminal (or an in=storage list containing source data) is the 
current source of input, PUTGET obtains operands or data from the 
terminal, as follows: 


IKJEFTS4 
IK JEFTS6 
IKJEFTS5 


TEXTIN 
TERMOUT 
GETLINE 


e@ Formats the output line in o buffer, if necessary, 


e@ Sends the line to the terminal, 


a) e  Getsa line from the terminal, 


b) If the line begins with a questionmark ("?'"): 


CHAINOUT | {fKJEFTS2 


e Formats and next-level message to the terminal, 


e Sends "NO INFORMATION AVAILABLE ” message if no 
next-level message was provided, 


@ Regeats step 3a, 


GETLINE IKJEFTSS 


c) If the line does not begin with a questionmark ("2"), return to caller, 
(If the line begins with a questionmark, repeat step 3b.) 


Method of Operation Diagram 12. PUTGET Service Routine (Prompting Mode) (Part 2 of 2) 


Section 3: Program Organizati: n 


This section describes the organization of the terminal I/O service 
routines: STACK, GETLINE, PUTLINE, and PUTGET. It contains information 
about the hierarchy of the load module, the assembly modules, and the 
control sections that constitute the program. Figure 11 is a graphic 
representation of this hierarchy. 


The module operation information briefly describes the processing 
operations that occur within each cerminal I/O service routine module. 


For a summary of the functions performed by subroutines, refer to the 
directory in Section 4. 


Program Hierarchy 


The terminal I/O service routines are all parts of a single load module, 
IKJPTGT, as shown in Figure 11. Load module IKJPTGT has the following 
control sections: 


IKJEFT30 -- STACK service routine (IKJSTCK) 

IKJEFT35 -- I/O service routine messages 

IKJEFT4&0 -- PUTLINE service routine (IKJPUTL) 

IKJEFT45 -- PUTGET service routine (IKJPTGT) 

IKJEFT52 -- CHAINOUT subroutine for PUTLINE and PUTGET 
IKJEFT53 -- UNCHAIN subroutine for PUTLINE and PUTGET 


IKJEFT54 -- TEXTIN subroutine for PUTLINE and PUTGET 
IKJEFT55 -- GETLINE service routine (IKJGETL) 
IKJEFT56 -- TERMOUT subroutine for PUTLINE and PUTGET 


Note that load module IKJPTGT has four entry points: 


IKJSTCK -- for STACK 
IKJGETL -- for GETLINE 
IKJPUTL -- for PUTLINE 


IKJPTGT -- for PUTGET 
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IK JPTGT 


Terminal |/O 


Service Routines 


IK JEFT30 


STACK Routine 


IK JEFT35 


(IKJSTCK )* 


I/O Service 
Routine 
Messages 


IK JEFT40 


PUTLINE 
Routine 


IK JEFT45 


PUTGET 
Routine 


IK JEFTS2 


CHAINOUT 
Routine 


IK JEFTS3 


UNCHAIN 
Subroutine 


IKJEFTS4 


TEXTIN 
Subroutine 


IK JEFTS5 


GETLINE 
Routine 


IK JEFTS6 


TERMOUT 
Subroutine 


(IKJPUTL)* 


(IK JPTGT )* 


(IKJGETL)* 


* Entry point name. 


Load Module Names Normal Residence Approximate Sizes 


IK JPTGT SYST.LINKLIB 6.5K bytes 


= = | _— : nee, 


Figure 11. Program Hierarchy: Terminal I/O Service Routines 
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Module Operation 


The following descriptions briefly describe the processing operations in 
each executable module of the terminal I/O service routines. 


IKJEFT30 -- STACK SERVICE ROUTINE 


Creates and updates the input stack (INSTACK) which defines the current 
source of input: either from the terminal or from an in-storage list. 
e Creates the input stack. Initializes the first element (bottom 
element) to describe the terminal as a source of input. 
e Adds an element to the top of <he input stack to define a new scurce 
Of input: either from the terainal or from an in-storage list. 
*e Deletes one or more elements from the top of the input stack, as 
follows: 
- top element only. 
- all elements down to and inciuding the first element that 
describes an in-storage list containing a procedure. 
- all elements down to the first element (bottom element). The 
bottom element is never removed. 


IKJEFT40O -- PUTLINE SERVICE ROUTINE 


Processes line(s) of output and sends then to the terminal. Performs 
one of the following functions: 

e Formats a message only. Does not send it to the terminal. 

e Formats a single-level informational message and sends it to the 
terminal. 

e Formats a first-level informational message, sends it to the 
terminal, or sends a first level informational message to the 
terminal and chains a second-level message to the ECTSMSG field of 
the ECT. 

e Sends line(s) of data to the terminal. 


IKJEFT45 -- PUTGET SERVICE ROUTINE 


Entry module for the PUTGET service routine. Determines actions to be 
taken in PUTGET processing based on the input parameters, the user 
options specified in the UPT, the type of input source specified in the 
input stack, the type of response made by the terminal user, and the 
actions of subroutines. 


PUTGET has two processing modes: command mode and prompting mode. 

e In command mode, a mode message is sent to the terminal and a line 
of input is obtained from the terminal or from an in-storage list. 

e In prompting mode, a prompting message is sent to the terminal 
(unless the user has specified NOPROMPT or the current source of 
input is an in-storage procedure) and a line of input is obtained 
from the terminal. 


IKJEFT52 -- CHAINOUT SUBROUTINES OF PUTLINE AND PUTGET 


Sends chained second-level messages, if available, or notifies the 
terminal that no second-level messages are available. 
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IKJEFT53 -- UNCHAIN SUBROUTINE OF PUTLINE AND PUTGET 

Frees the storage allocated to a second-level message chain. Zeroes the 
ECTSMSG field in the ECT to indicate that no second-level messages are 
chained. 


IKJEFTS4 -- TEXTIN SUBROUTINE OF PUTLINE AND PUTGET 


Obtains a buffer for an output message and moves the segment(s) of that 
message into the buffer to produce one contiguous character string. 


TEXTIN processes four types of messages: 


1. Single segment messages. These are validity checked and returned 
to the caller with no further processing. 


2. Multiple segment messages. These are validity checked and segments 
are inserted to produce one contiguous character string. 


3. Format only requests. These are validity checked and placed ina 
subpool 1 buffer. 


4. Chained messages. Single segment or multiple segment messages that 
are to be forwarded-chained. These are validity checked and the 
segments are inserted, if necessary. A oOne-word forward-chaining 
element is built and the message is placed ina subpool 78 buffer. 


IKJEFT55 -- GETLINE SERVICE ROUTINE 


Obtains a line of input from the terminal or from the current source of 
input as determined by the input stack. 


IKJEFT56 -- TERMOUT SUBROUTINE OF PUTLINE AND PUTGET 


Sends line(s) of output to the terminal. The line(s) can contain 
messages or data. 
e If the line(s) contain messages, TERMOUT optionally strips off 
message identifiers before sending line(s) to the terminal. 


*e If the line(s) contain data, TERMOUT sends them to terminal without 


further processing. If the data is multi-line, TERMOUT sends all 
the lines to the terminal. 
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Section 4: Directory 


This chart contains information to help you find the appropriate program description, 
It correlates information from three sources: 


flowchart, 


e® The source code. 


or assembly listing. 


® The executable load modules. 


e This manual. 


| 
L 
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Diagram 
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| { | Load |Assembly|{Control | | 
{| Command |Module |Moduie |Section | | 
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TERE SOI GuRen res | LIKJSTCK  eennery pean aye and updates the | 
| {Service | | | J}IOSRL and input stack | 
| | Routine | | | jwhich determine the | 
| | | | | {current source of | 
| | | | ! | input. | 
| | | | | | 
| IKJEFPT35|Terminal J} IKJPTGT | IKJEFT35| IKJEFT35|Contains message segments | 
[ |I/O Service| | | jused by terminal I/0 | 
| | Routine | | | jservice routines. | 
| | Message | l | | | 
| oe | | | | 
| IKJEFT40 | PUTLINE {IKJPTGT | IKJPUTL |IKJEFT4O|Sends line(s) of data to | 
| |Service | | | jthe terminal; formats | 
| | Routine | | | |messages and sends them to | 
| | | | | jthe terminal. | 
| | | | | | | 
| IKJEPT4S | PUTGET {IKJPTGT |IKJPTGT | IKJEFT45|Sends messages to the | 
| | Service | | | jterminal and obtain a line| 
| | Routine | | | Jof input from the current | 
| | | | | J|source of input | 
|. | | | | | 
| IKJEFT52 | CHAI NOUT | IKJPTGT | IKJEFT52|IKJEFT52|Sends chained second:-leve! ; 
| {Subroutine | i | j|messages if availabie, or | 
| { | | | Jnotifies terminal that. no |} 
| | | | | |messages are available. 
{ | | | | 
| IKJEFT53| UNCHAIN | IKJPTGT | IKJEFT53|IKJEFT53|Frees storage allocated tc | 
| [Subroutine | | | |second-level message chain. | 
| l | | | | 
| IKJEFT54|TEXTIN [| IKJPTGT | IKJEFT54|IKJEFT54|Obtains message buffer and | 
| {Subroutine | | | | inserts message segments. | 
| | | | | | | 
| IKJEFT55 |GETLINE | IKJPTGT |IKJGETL | IKJEFT55|Obtains Line(s) of data { 
| | Service | | | Jfrom the terminal or from | 
: | Routine [ | | |}current source of input. | 
er cere Cee op seeuse | exaeereey sends line(s) to the | 
| {Subroutine | [ | |terminal 
ei 1 Seem eee eee Leena ere ee Meee ett 3 Ger eee eae De Na eR pel Se Po MN eR RE ON re 
|Note: IKJPTGT is a reenterable and refreshable load module. Normal residence is 
SYS1.LINKLIB. 
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Section 5: Data Areas 


This section describes the major data areas used by the terminal I/0 
service routines, including: 


Environment control table (ECT) 

GETLINE parameter block (GTPB) 

Input stack (INSTACK) 

I/O parameter list (IOPL) 

I/O service routines parameter list (IOSRL) 
List source descriptor (LSD) 

Output line descriptor (OLD) 

PUTGET parameter block (PGPB) 

PUTLINE parameter block (PTPB) 

STACK parameter block (STPB) 

Text insertion parameter list (TXINPARM) 
User profile table (UPT) 


The following information appears for each data area: 


Size, in bytes. 

Name(s) of the routine(s) that creates it. 

Name(s) of the routine(s) that update and/or reference it. 
Field names, displacements, size, and contents. 
Cross-reference to method of operation diagrams and program 
flowcharts. 
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ENVIRONMENT CONTROL TABLE (ECT) 


Size: 4O bytes. 

Located in: Subpool 1. 

Created by: Terminal monitor program (IKJEFTO1). 

Updated by: IKJEFT45S, IKJEFT52, IKJEFT5S3, IKJEFTS5S, 
IKJEFT56. 

Referenced by: IKJEFT30, IKJEFT45, IKJEFTS2, IKJEFT53, 


IKJEFT5S5, IKJEFT56. 


contents: Information about the user's environment in the 
foreground region. 


TES 1 
| 


Operation| 

|Diagrams | 

--—----— { 

{8-12 | 
(=o ee oe. Salven : an a = =- === { 
|Displacement| Field [Size | { 
| Dec. Hex . | Name {Bytes | Contents | 
}------------ }---------- t------ -}-------------------------------------- { 
] 0 0 {ECTRTCDF | 1 [ABEND Flags. Bit settings, as | 
| | | | follows: | 
| | | { . | 
| i | [Bit Meaning when on | 
| { j | 0 ABEND in the command processor. | 
| | { { | 
| | | {1-7 Reserved (0) [ 
| | | ( | 
{1 1 | ECTRTCD | 3 | Return code from ABEND. ( 
| [ | | | 
}4 4 | ECTIOWA ; 4 j¢ I/O service routine list (IOSRL) { 
| ( } [ | 
{8 8 | ECTMSGF ij 1 |Message flags. Bit settings, as | 
| { | | follows: { 
| | | | . | 
{ ( l [Bit Meaning when on | 
{ | | | 0 Delete second-level messages. | 
| { i | | 
| { | j1-7 Reserved (0) | 
{ ( | | | 
[9 9 | ECTMSG | 3 | * Second-level message chain, or zero | 
4 | | {if no messages are chained. 
1 | l [ | 
J12 Cc | ECTPCMD | 8 |Command name. [ 
| { I | | 
| 20 14 =|ECTSCMD | 8 |Subcommand name. | 
| | | | | 
[28 ic | ECTSWS {| 1 JECT switches. Bit settings, as | 
| { | | follows: { 
| | { | | 
| | | [Bit Meaning when on | 
| | ECTNOPD | | 0 No parameters exist in command | 
| j | | buffer. | 
| | | ( {| 
i i | {1 Reserved (0). i 
Des a a fee eae ee Ga a at te hp ae es ee J 

(Continued) 
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C 


for ee ee les ee oe ire ee ope oe oe Ge ee eS Pee Ge PE 7 
| Displacement| Field |Size in| | 


|Dec. Hex. | Name |Bytes | Contents | 
|------------ }---------- +------- }-------------------------------------- { 
| | ECTATRM | | 2 Command processor being | 
| | | | terminated by the TMP using a | 
| | | | DETACH macro instruction with a | 
| | | | STAE operand. | 
| | | | 
| | ECTLOGF | | 3 LOGON or LOGOFF command processor | 
| | | | has requested re-logon or logoff. | 
| | | | | 
| | ECTNMAL | 14 No user messages at logon. | 
| | | | 
| | ECTNNOT | | 5 No system messages at logon. | 
| | | | | 
| | | |6-7 Reserved (0). | 
| | | | | 
| 29 1D |ECTDDNUM | 3 | Counter used by dynamic | 
| | | { allocation SVC routines when | 
| | | | assigning temporary ddnames. | 
| | | | | - 
| 32 20 |ECTUSER | 4 | Reserved for installation. | 
| | | | | 
| 36 24 | | 4 | Reserved (0). | 
2 ts a ec jen eer a anne ny se RE CE Re ede a a a Pe Oe TER J 
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SETLINE PARAMETER BLOCK (GTPB) 


Size: 8 bytes. 

Located in Subpool Any. 

Created by: Caller of GETLINE service routine. 

Updated by: IKJEFT55. 

Referenced by: IKJEFT55. 

Contents: Control information to GETLINE. 
(47 
| Operation| 
{Diagrams | 
}--------~ 
| 9 | 

Otis oad ake al eet ae Oe oe Wes es fe, oe ee ee S22 eS SSe== { 

| Displacement | Field {Size in| | 

| Dec. Hex. | Name |Bytes | Contents | 

pra-----~2---$------ = }-------}-----------------+------2------------- 

0 0 PARMCNTL 2 |Control flags. Bit settings that 


Jindicate the operation to be performed 
| by GETLINE, as follows: 


oo 
> 
ct 


Meaning when on 
Reserved (0). 


Xu 
Le) 


PARMPHYS 


Le) 


The line of input is a physical 
line; if zero, it is a logical 
line. 


PARMT ERM 


£ 


The source of input is the 
terminal; if zero, it is as 
described by the top element on 
the input stack. 


5-15 Reserved (0) 


PARMTGT TGET options. Bit settings that 
indicate the operation to be performed 


, aS follows: 


oO 
an 
| 
@ 
tH 
| 


Meaning when on 
Always set for TGET. 


0 
1-2 Reserved (0). 

3 NOWAIT was specified; if zero, 
4 

7 


| 


WAIT was specified. 

-6 Reserved (0). 

ASIS was specified; if zero, EDIT 
was specified. 

Reserved (0). 


co 
l 

_ 

wn 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


For further information about the| 
TGFT macro instruction see OS/VS2| 
TSO Guide to Writing a Terminal’ | 
Monitor Program or a Command | 

| 


A 


Processor, GC28-0648. 


ee we en on nn ee ns 
Le) 
h 
rm ee i we ee ee ee ene eee 
fe mm ee a a i ee Sn es es es 
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Cee | rere Deg se a a ee 1 
| Displacement | Field |Size in| | 
| Dec. Hex .| Name |Bytes | Contents | 


+ 
| 4 {|The address of the input buffer that | 
| {contains the line. The format of the | 
| |buffer is as follows: [ 
| | | 
| | Byte Contents | 
| |0-1 The length, in bytes, of the | 
| { input buffer. | 
| |2-3 The offset to the first character | 
{ { in the input line. | 
| }4-47 The line of input. | 
L L 
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INPUT STACK (CINSTACK) 


Size: Variable. A multiple of 32 bytes. 

Located in: Subpool 78. 

Created by: IKJEFT30. 

Updated by: IKJEFT30. 

Referenced by: IKJEFT45, IKJEFT55. 

Contents: A last in/first out (LIFO) queue of elements 


that describe sources of input. 


all eight available positions become active stack elements, then the |_ 
Stack is enlarged by 8 more words (32 more bytes). | 


2 1 
| Operation| 
[Diagrams | 
f==s===--— { 
| 8 | 
fear a 5 Sane Sg seca ave saa a aaa eae 1 
| Displacement | Field |Size in| | 
| Dec. Hex. | Name {jBytes | Contents | 
|------------ }---------- }-------}-------------------------------------- { 
{0 0 | INSCODE j 121 |Bit settings that describe the type of | 
| | | jJelement, as follows: 
| | | | | 
| | | |Bit Meaning when on | 
| | INSTERM { ae Terminal element. | 
| | { | | 
| | INSSTOR | {1 Storage element. | 
| | { | | 
| | | [2-5 Reserved (0). | 
| | l | i 
| | INSPROC | | 6 Procedure element. | 
| | | | | 
| | INSLIST | | 7 List each line of the in-storage | 
| | | | list at the terminal when PUTGET | 
| | i obtains it. | 
| | | . | 
{1 1 | INSADLSD | 3 |The address of the list source | 
| | | | descriptor (LSD) or zero for a | 
| | | j terminal element. | 
| | ; | | 
,4 4 | INSCODE } 1 |Same as above. { 
| | | | 2nd stack element | 
[5 5 | INSADLSD | 3 |Same as above. | 
[ | [ | | 
|. . | ° | | - | 
|. . | . l | - | 
| - ° | ° | | - | 
| - : | . | |- | 
| | | i | 
{28 1C |INSCODE | 1 |Same as above. { 
| | ; 8th stack element | 
| 29 1D  |INSADLSD | 3 |Same as above. | 
}------------ De Pete ee ee j reer neat ca ae 4 
{\Note: The initial size of the input stack is 8 words (32 bytes). If | 
| 
| 
L 
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INPUT/OUTPUT PARAMETER LIST (IOPL) 


Size: 16 bytes. 

Located in Subpool Any. 

Creat ed by : Caller Of STACK, GETLINE, PUTLINE or PUTGET 
service routine. 

Updated by: None. 


Referenced by: IKJEFT30, IKJEFT4O, IKJEFT45, IKJEFT55. 


Contents: 


(—--—- 1 
| Operation | 
|Diagrams | 
| 8-12 | 

SaaS 1 ss ae Tose Seen se Se ee ae 4—-—-—-——--— { 
| Displacement | Field {Size in| | 
|Dec. Hex. | Name [Bytes | Contents i 
}------------}--—---—-- }-~—----}_---------------—~-----—------------- 

| 0 0 | IOPLUPT ; 4 |The address of the user profile table | 
| | | | (UPT). | 
i 4 4 | IOPLECT } 4 |The address of the environment control | 
| | | jtable (ECT). { 
| | [ | 
| 8 8 | TOPLECB | 4 {The address of the command processor's| 
| [ [ Jevent control block (ECB). | 
| | | | 
{12 Cc {IOPLIOPB | 4 |The address of the parameter block for | 
| | | [one of the terminal I/O service [ 
| | | | routines, as follows: 
| | | | | 
| | | | Service Routine Parameter Block | 
| i | | STACK STPB [ 
| [ | | GETLINE GTPB | 
| i | | PUTLINE PTPB { 
| { | | PUTGET PGPB | 
ee a ee ee (eR ee ae fae me a eee a a ee et J 
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I/O SERVICE ROUTINE LIST (IOSRL) 


Size: 20 bytes. 

Located in: Subpool 78. 

Created by: IKJ EFT30. 

Updated by: IKJEFT30. 

Referenced by: IKJEFT45, IKJEFT55. 

Contents: Information about the current status of the 


input stack. 


ea reece: 1 
| Operation 
{Diagrams | 
18-9, 11-121 
Poses SSS Se— sg seamen eval ca ca ; aaa ee qf Sea ee Se Sa a a 4 
| Displacement] Field {Size in| | 
| Dec. Hex. | Name |Bytes | Contents | 
[~--~-------- }---------- $------- |-----~-------------------------------- ! 
| 0 0 | TIOSTELM [| 4 {The address of the top element on the | 
| | | jinput stack which describes the | 
| | | | current source of input. [ 
| | | | 
[4 4 | IOSBELM | 4 {The address of the bottom element on | 
| | | |the input stack which describes the | 
| | | Jterminal as the source of input. | 
| | | | | 
Rs) 8 | IOSTLEN | 2 |The total length, in bytes, allocated | 
| | | |for the input stack, as obtained by a | 
| | { | GETMAIN. [ 
| | | 
J12 Cc | TOSNELM | 2 |The number of elements that were on | 
| | | {the input stack when the last GETMAIN |] 
| - | | Jwas issued. 
| | | | | 
{16 10 | -- j 4 |Reserved (0). { 
eae eee eae Peta Doe so, 5 aac a, ec et wee ae Re a EO TT ee 5 
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LIST SOURCE DESCRIPTOR (LSD) 


Size: 16 bytes. 

Located in: Subpool 78. 

Created by: Caller of STACK service routine. 

Updated by: IKJEFT55 (as GETLINE or as the GETINPUT 

subroutine of PUTGET. 

Referenced by: IKJEFT30, IKJEFT55. 

Contents: Information about an in-storage list. 
fe 1 
| Operation | 
|Diagrams | 
}--------- { 
| 8-9,11-12| 

eC ; {oS Soe a Saar + 

| Displacement | Field [Size in| i 

[Dec Hex . | Name {Bytes | Contents [ 

}------------ +------—-- }-------}------------------------------------- 

| 0 0 | LSDADATA 4 |The address of an in-storage list. 


|Set by the caller of STACK. Referred 

[to by STACK, GETLINE and PUTGET. 

| 
2 |The length, in bytes, of each record 

Jin the in-storage list, or zero if the 

|records are in variable-length format. 


| 
[ 
| 
[ 
[ 
[ 
| 
2 |The total length, in bytes, of the [ 
Jin-storage list. Set by the caller of| 

| STACK. | 

[ 

| 

[ 

| 

l 

J 


nn: 
go og «OS 
. 6g (B 
ee: 


| 
4 |The address of the next record to be 
jread. Set by the caller of STACK. 
| Updated by GETLINE and PUTGET. 
| 
ji2 Cc J|LSDRSVRD [| 4&4 |Reserved (0). 


hoe ee es bo ae ee ae a ee ee ee a a eS Se ae Sa SS Se eo eee 


Section 5: Data Areas 103 


OUTPUT LINE DESCRIPTOR (OLD) 


Size: Variable. 
Located in Subpool Any. 
Created by: Caller of PUTLINE or PUTGET service routine. 
Updated by: IKJEFT4O. 
Referenced by: IKJEFT4O, IKJEFT4S, IKJEFT54, IKJEFT56. 
Contents: The addresses of message segments. 
i eT. 
| Operation| 
{Diagrams | 
,10-12 | 
feo iy ar ee ear A SC RR a aa aa ae a an a ac 1 
| Displacement | Field {Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ }---------- }------- $-------------------------------------- : 
0 0 u |The address of the next OLD or zero 


}for the last OLD in the chain. (This 
| field is present only if the message 
jpointed to is a multi-level message.) 


| | [ | 
{ | | | 
( | | | 
{ | | | 
| | | | 
| 4 uy | ; 4 |The number of message segments in this| 
: | | | OLD. | 
{8 8 | } 4 \The address of the first message | 
| | | | segment. 
{12 Cc ; | 4 |The address of the second message | 
i { | | segment. | 
{ | | [ | 
|- ° | | | - | 
|. ° | | | - | 
| - ° | | | - | 
{ | | | | 
| | |} 4 |The address of the last message | 
| [ { | segment . | 
Meroe oo ek ee een are pare a i een one ORES Oh a Ss a A ee 5 
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PUTGET PARAMETER BLOCK (PGPB) 


Size: 

Located in Subpool 
Created by: 
Updated by: 
Referenced by: 


Contents: 


— TT 
{Displacement |Field 


|Dec. Hex . | Name 


}------------ $--—------ 


0 0 PTGPCNTL 


16 bytes. 
Any. 

Caller of 
IKJEFT55. 


IKJEFT45, 


PUTGET service routine. 


IKJEFT55, IKJEFT56. 


Control information for PUTGET. 


ea 1 
| Operation | 
|Diagrams | 
[11-12 | 

: a enue Ya ey tr ee a ee ea 

|Size in| | 

|Bytes | Contents | 

}-------}-~----------------------------------- ~ 
2 | PUT options. Bit settings that 


PTGPPRMT 


PTGPMODE 


PTGPDMND 


PTGFORM 


PTGPBYPS 


wn ee a ee ee ee ee ee ee es a es ee os ee ee 


| indicate the output operations to be 
|pexrformed by PUTGET, as follows: 


ow 


oe) 


_ 
-) 


ay 


ay 


-- 


kd 


ct 


Meaning when on 
Reserved (0). 


Reserved (0). 


\O co ~l ON wn _ Wa) Le) - >| 


ct 


| 


12-15 Reserved 


Always zero for PUTGET. 
Single-level format. 
Always zero for PUTGET. 
Multi-level format. 
Always zero for PUTGET. 
Prompting message. 

Mode message. 


Reserved (0). 


Meaning when on 


Reserved (0). 
Bypass processing. The terminal 
will send a message without 


printing it. (Used 
communications such 
passwords.) 


as 


for secret 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
-| 
| 
| 
| 
| 
| 
| 
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lpeeplaeement| Field |Size int | 
| Dec. Hex .| Name [Bytes | Contents | 


PTGPTPUT 2 - |TPUT options field. Bit settings that 
{indicate the TPUT options requested, 


jas follows: 


Bit Meaning when on 
Always zero for TPUT. 


| 
| 
| 0 
| 1-2 Reserved (0). 
| 3 NOWAIT processing requested. 
[4 HOLD processing requested. 
[5 BREAKIN processing requested. 
| 6 CONTROL processing requested. 
|7 ASIS processing requested. 
|8-15 Reserved (0). 
| 
{For further information about TPUT 
{macro instruction, refer to the OS/VSz 
[TSO Guide to Writing a Terminal 
{Monitor Program or a Command 
| Processor, GC28-0648. 
| 
4 jThe address of the output line 
| descriptor (OLD) for the message. 


ya 
F ny 


PTGPAOUT 


oO 
& 


PTGGCNTL 2 JGET options. Bit settings that 
jandicate the input operations to be 


jperformed by PUTGET, as follows: 


PTGGBITO Reserved (0). 


owes gee Oe eee Oe pee SE ee Se ee ee es ee eee ee oe eo oe ee a ae a eee re 


as) 
| 
Q 
) 
4) 
an 
bt 
6) 


Oo. 

1 Not used in PUTGET. 
5 Not used in PUTGET. 
3 


ty 
er 
Q 
@ 
rs 
tH 
& 


Demand from terminal. 


PTGGBRSV 4-15 Reserved (0). 


eee OR gee eee eee OO ee ee Oe ewe OE oe 


os 
© 
a) 


PTGGTGET 2 |TGET options. Bit settings that 
Jindicate the TGET options requested, 


{as follows: 


Bit Meaning when on 
Always set for TGET. 


0 
1-2 Reserved (0). 

3 NOWAIT processing requested. 
4-6 Reserved (0). 

7 ASIS processing requested. 
8-15 Reserved (0). 


oe eee Cee ces ee OO ee OE 


{|For further information about TGET 
{macro instruction, refer to the OS/VS2 
|TSO Guide to Writing a Terminal 


|Monitor Program or a Command 
| Processor, GC28-0648. 


| 
4 {The address of the input buffer 
| receiving the line. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Bit Meaning when on 
| 
| 
| 
| 
| 
! 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
PTGGADIN | 
| 


C—O ee ee ee ee ee nn ee ee ee eee ee ee ee en ee ee ee es = eee eee ee ee ee ee ea —S———— = 


rg 
a 
Q 
?) 
G? 
2 
i ir ew 2. ee ee ee ee ge ee i a ee ee ee ee ee ee ee es ee ee ee ee 


pests ww wns ss ee es i ee ees ee ee gee 
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( PUTLINE PARAMETER BLOCK (PTPB) 


Size: 12 bytes. 
Located in Subpool Any. 
Created by: Caller of PUTLINE service routine. 
Updated by: IKJEFT56. 
Referenced by: IKJEFT4O, IKJEFT54, IKJEFT56. 
Contents: Control information for PUTLINE. 
aA. 
| Operation| 
[Diagrams | 
{ 10 | 
(= ae a Sn: aca a ASSe Sess { 
| Displacement ]| Field |Size in| | 
| Dec. Hex . | Name {Bytes | Contents | 
|------------}------—-- }-------}-----------------------------—-------- | 
| 0 0 |PARMCNTL | 2 |Control Flags. Bit settings, as | 
| | | | follows: | 
| | | | | 
| [ [ [Bit Meaning when on | 
| | | | [ 
| |PARMPBTO | | 0 Reserved (0) | 
| | | | | 
| | PARMPUT | {1 Reserved (0) [ 
| | | | | 
= | |PARMDTMS | | 2 Line contains data. If 0, line | 
| | | | contains message. | 
| | | | | 
| | PARMSNGL | | 3 Line is single-level or { 
| | | | single-line. [ 
| | | | | 
| |PARMMLIN | \4 Multi-line format (data). | 
| | | | | 
| | PARMMLEV | [5 Multi-level format (messages). | 
| | | | 
| |PARMIFOR | | 6 Informational message. | 
| | | | | 
| |PARMPRMT _ | | 7 Reserved (0). | 
| | | | | 
| |PARMMODE | | 8 Reserved (0). | 
| | | | 
i | PARMDMND | | 9 Reserved (0). | 
| | | | | 
| | PARMFORM | {10 Format Only. (Do not send | 
| | | | message to the terminal). | 
| | | | | 
| | PARMUNUS __ |{ }11-15 Reserved (0) | 
ee eee ae eee ee j Cee ner See j gene er a ae A ae ee ee J 
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[Displacement | Field suze in| 


| Dec. 


[------------ t---------- 


N 


SS SS OE SS ES Oe ee a 
ot 


108 


Hex .| Name jBytes | Contents 

2 | PARMT PUT 2 - | TPUT options field. Bit settings that 
Jindicate the TPUT options requested, 
{as follows: 


Meaning when on 
Always zero for TPUT. 


Reserved (0). 

NOWAIT processing requested. 
HOLD processing requested. 
BREAKIN processing requested. 
CONTROL processing requested. 
ASIS processing requested. 


F 


RS 


a ie a i 


[|B 
io 
| 
i 
| 
| 
| 
| 
| 


For further information about TPUT 
jmacro instruction, refer to the OS/VS2 
{TSO Guide to Writing a Terminal 


|Monitor Program or a Command 
| Processor, GC28-0648. 


|8-15 Reserved (0). 


4 |The address of output line descriptor 
| (OLD) for a message or the address of 
jthe fullword header for data. 


4 |The address of the formatted line if 
|"format only” was specified. 
{ Otherwise, the field is not changed. 


Se SS ST ee ee ee ee ee ge ee ae 
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=—— 
| 
| 
| 
| 
| 
| 
i 
{ 
| 
i 
i 
| 
| 
| 
[ 
| 
| 
| 
| 
| 
l 
| 
| 
| 
! 
| 
| 
! 
| 
l 
| 
| 
! 
| 
! 
! 
| 
| 
| 
| 
| 
| 
| 
— 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


a a A a a a a ee a 4 


STACK PARAMETER BLOCK (STPB) 


Size: 8 bytes. 
Located in Subpool Any. 
Created by: Caller of STACK service routine. 
Updated by: None. 
Referenced by: IKJEFT30. 
Contents: Control information for STACK. 
ee on ate Ee 1 
lOperation| 
|Diagrams | 
| 8 | 
te ee are ye ee a a ee 
[Displacement |Field {Size in| | 
[Dec. Hex.|Name {Bytes | Contents | 
}--~----------}~--~------ }-------}-------------------------------------- 
{0 0 |STBOPCOD | 1 {Operation code. Bit settings that | 
| | | | indicate the operation to be | 
| i { |performed, as follows: | 
| | | | | 
i | ] |Bit Meaning when on “| 
H | SPADD { | 0 Add one element to the top of the] 
| | | | stack. | 
| |SPBDLCUR | {1 Delete one element from the top | 
{ | | | of the stack. | 
| | SPDLPRC | | 2 Delete the current procedure | 
| | | i element from the stack. If the | 
{ | | | top element is not a procedure | 
| | { | element, delete ali elements down| 
| | | | to and including the first | 
| | | | procedure element. | 
{SPBCLALL | [3 Delete all elements down to the | 
{ | | | bottom element. (The bottom | 
| | | | element is never removed.) | 
| {SPBRSVRD_ | |4-7 Reserved (0). | 
| | | | | 
{1 1 | STBCODE } 1 lElement code. Bit settings that | 
| { | jindicate the type of element to be | 
| | | added to the stack, as follows: [ 
| | | | 
| | | {Bit Meaning when on | 
i | SPBTERM | | 0 Terminal element. | 
| | SPBSTOR | | 1 In-storage element. | 
| |SPBRSVD | {2-5 Reserved (0). | 
{ | SPBPROC | | 6 Procedure element; if zero, | 
{ | | | source element. | 
| | SPBLIST | | 7 List each element at terminal as | 
| | | | read. Used only by PUTGET. | 
| | | | | 
| 2 2 {SPBRESVD | 2 | Reserved (0). { 
| | | | | 
| 4 4 J|STBADLSD | 4 |The address of the list source | 
| | | {descriptor (LSD). If the input source| 
| | | [is the terminal, or if the delete { 
| | | {function was specified, the field will| 
| | | }contain zeroes. | 
Pacha eee, aera are ene oie he OGD Le cp oeRe Mane ne a nO a oy ean Pern a eae ae J 


Section 5: Data Areas 109 


TEAT INSERTION PARAMETE&R 


Size: 

Located in Subpool 
Created by: 
Updated by: 


Referenced by: 


Contents: 

a a a pe ee ees 5 Ss 
| Displacement | Field }Size in| 
| Dec. Hex. |Name | Bytes 
t 

| O 0 {TXISEGMT | 4 

| | | 

| | | 

} 4 4 | TXIFRMSG | 4 

H | | 

| | | 

| | | 

| | | 

| | | 

|8 8 | TXIFONLY § | 4 

| | { 

| | | 

| | | 

| | | 

| | { 

[ | 

[PS epee ee 1 SSP en eae eee L 
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LIST (TXINPARM) 


12 bytes. 


Any. 


IKJEFT4O, 


None. 


IKJEFT45. 


IKJEFTS4. 


Information about output messages. 


a ee ee ee — ee eee ee ee a oe eee ee Se cee ee ce ce ee ee ee ee ee re ee re ee ee ee ee ee ce ee ee ee ee ee a 


| 
| 
| 
| 
t 
| 
I 
= 
! 
! 
| 
| 
| 
l 
| 
1 
1 
| 
| 
1 
{ 
| 
| 
' 
! 
I 
! 
| 
i 
I 
/ 
t 
| 
| 
t 
| 
| 
! 
j 
i 
{ 
i 


erogram 


fo ott te 1 
|Operation 
|Diagrams | 


| Contents 


{The address of the output Line 
{descriptor (OLD). 


{|The address of a one-word field into 
jwhich the TEXTIN subroutine places the 
jaddress of a formatted message. The 

| formatted message is constructed from 
| variable-length segments in the OLD. 
jThe address of a one-word field used 
jas a switch, as follows: If set on 
jentry to IKJEFTS4Y, it indicates 
|"Format Only” is requested. If set on 
jexit from IKJEFT54, it indicates 3 

| PUTGET or PUTLINE buffer must be 
| freed. 


ee 


1 
t 
be me ene oe 


(VG2 Release 1) 


USER PROFILE TABLE (UPT) 


Size: 16 bytes. 
Located in: Subpool 0. 
Created by: LOGON/ LOGOFF scheduler. 
Updated by: PROFILE command processor. 
Referenced by: IKJEFT45, IKJEFT56. 
Contents: Information about terminal user. 
i Ta am ara | 
| Operation | 
{Diagrams | 
| 8-12 | 
(So ee eos Wi a es ee SSS Sa Se { 
| Displacement |Field [Size in| | 
|Dec. Hex. | Name [Bytes | Contents | 
}------------ }+--—------ +------- }~----------------------------------— 4 
| 0 0 [==-=S=== J 2 |Reserved (0). { 
| | | | 
| 2 2 | UPTUSER | 10 |Reserved for installation use. { 
| | | | 
J12 Cc | UPTSWS { 1 {User environment switches. Bit | 
| | | |settings, as follows: - | 
| | | | | 
[ | i {Bit Meaning when on | 
| | | | 0 Reserved (0). | 
| | { | 
| | UPTNPRM | {1 Prompt; if zero, no prompt. [ 
| | | | 
[ | UPTMID | | 2 Message identifiers; if zero, | 
[ | | | message identifiers will be | 
[ | | | removed. | 
| | | | a . | 
{ | UPTNCOM | | 3 No user communication using the | 
| | | | SEND command; if zero, user | 
[ { | | communication is permissible. | 
| | | | 
| | UPTPAUS | | 4 PAUSE was specified; if zero, | 
| { | | NOPAUSE was specified. | 
| | | | | 
| | UPTALD | {5 Attention is a line delete | 
i H | [ character; if zero, attention is | 
| [ | | not a line delete character. | 
| | | | | 
| { j [6-7 Reserved (0). | 
| | | | | 
j13 D | UPTCDEL [I <E [Character delete character. { 
| | | | | 
}14 E | UPTLDEL {| 1 |line delete character. | 
| | | | 
}15 F [Sena {| 1 |Reserved (0). | 
De a et oe erences ae Seen SPEER Pe NEM tec PN er RS Pe Ee ee PE EE ee J 
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Section 6: Diagnostic Aids 


This section contains the following information: 


« Messages (Figure 12) -- a list of messages issued by terminal I/0 
service routines. 


® Register Usage (Figure 13) -- a summary of the use of general 
registers 0-15. 


e Return Codes (Figure 14) -- a summary of return codes and their 
meanings. Unless otherwise specified, return codes are contained in 
register 15. 


Foe or Se Tov ee ee ag Oe eee ea a rn peers po re % 
[Message ID| Message | Issued by | 
ba ee ba a eo a ae ee ee a 
| I1KJ567601 |NO INFORMATION AVAILABLE | IKJEFTS6 | 
| | | | 
|I1KJ56761A | INVALID RESPONSE. ENTER ? | IKJEFT56 | 
| {OR HIT CARRIER RETURN- { | 

| | | 
j1KJ56762A | PAUSE | [KJeFT56 | 
ORE Roseanne eae Ras ye a em ne eens OP Pa ge SD Eee ee as Sen oes NT Be ee J 


Figure 12. Messages: Terminal I/O Service Routines 


11z2 OS/VS2 Terminal Monitor Program (VS2Z2 Release 1) 


IK JEFT30 


Work Register 


4 {OPL/Work Register 


4 ECT 


IK JEFT40 


Work Register 


Work Register 


A STPB 


Work Register 


Work Register 


Work Register 


A JOSRL 


Work Register 


Work Register 


Work Register 


Work Register 


Work Register 


Work Register 


Work Register 


Work Register 


Base Register 


Work Register 


4 Register Save Area 


Work Register 


Return Code 


IK JEFT45 


Work Register 


Work Register 


Work Register 


Base Register 


Work Register 


A Register Save Area 


Return Code 


R15 


IK JEFT52 


Work Register 


Work Register 


| Po RI | 4 Parm List RI 4 IOPL 
2 |UPTPTR | 4 UPT ECTPTR } ECT 

Ss = Sesto eae Seca See eee eo tat Ee ea 
3 ECTPTR A ECT | PTPBPTR ‘ ParneBlock 
4 R4 . Work Register Users Old Address 
ae ee: ee er eee aie ene eh eae ela Cee Sete ee 
s) R25 Work Register Users Output Option 
6 2s Work Register aa Work Register 
7 PGPBPTR | 4 PGPB Work Register 
eae SO == Ror bie? eli. iti Oe aera ew 
8 -- | Work Register Work Register 
hes sie np ob i, pain 
9 -- Work Res ier Work Register 

eae ee ——}— steie Paes re se Fi Ne Se? Fs bas Sa es 

10 r -- Work Register Work Register 

cu 2 eee ees oo. = ae 
1] | -- Work Register Work Register 

Sea ra as Bs Ries wanes pe sea othe ap canes Saget 

12 -- “Werk Register -- Work Register 

se A oe ee oo I ll i pe at ely a. 
13 R13 4 Register save Pica 4 Racists Save Area 

= ae a eens 

14 I -- Work Register Work Register 
i5 P| R15 7 ; Seti Code | ; _ Rein Code 


Figure 13. 


Register Usage: 


Terminal I/O Service Routines 


(Part 1 of 2) 


Section 6: Diagnostic Aids 113 


IKJEFTS3 


Register Name Contents 


<at Work Register <= 


IK JEFTS4 


Work Register 


Work Register 


Work Register 


Work Register 


| Work Register 
Werk REGIE! 


slain tek eats: 


4 1OPL 1 Parm List 
eee ee a= 
R2 Work Register R2 Work Register 
a Set 
-- Work Register -- Work Register 
a re - — ine ne 
a | Work Register -- Work Recister 
-- Work Register -- Work Register 
-- Work Register R6é 4 O.L.D. 
-- | Work Register R7 


4 Area for format msg 


Work Registe’ 


"Work Reaisiet 


cA ee itt 


Work Register 


Work Regtster 


Work Register 


Work Register 


Return Code 


Work Register 


IK JEFT55 


as Register Save Area 


“Work Register 


Retr Code 


Work Register 


‘ 


Work Register 


R] | A Parm list or 'GET' info 
in PUTGET parm block 


IK JEFT56 
Contents 


Ons Register 


7 Copy of {OPL 


A PTPB 


R3 Work Register 


GTPBPTR 4 GTPB 


STACKPTR 4 STACK 


-- Work Register 


R7 Work Register 


Work Register 


Work Register 


Work Register 


omeoeeat 
I 
i} 


Work Register 


— 
J 
I 


Work Register 


— — — —_ 
t 
i 


R15 SVC Return Codes 


Work Register 


Work EcglSleh 


Work Register 


Wor K Besicie: 


| 
— Se peat EH SV ot at) { 
| 


Work Register 


Work Register 


-- Work Register 


Work Reg! ster 


- Wor k Register 


Work Register 


Register Save Area R13 a Register Save pues 
Work Register == Work Register 
re L Retuin Code 


Figure 13. Register Usage: 
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J 


ao Return Code ‘ : 
Routine : Meaning 
Hexadecimal 


IK JEFT30 00 Normal, 


04 Operation code could not be interpreted, or an invalid record was found in an in-storage 
list for an add request, 


IK JEFT35 None This routine contains messages, 
IK JEFT40 04 An attention interrupt occurred during PUTLINE processing. 
08 A 'nowait! option was specified and no line returned, 
OC The write function could not be interpreted because of faulty input parameters, 
10 A conditional GETMAIN was executed and there was insufficient space, 
IK JEFT45 00 Normal, 
04 Input line not received from terminal, 
( 
08 No input returned and/or no output line put out, (An attention interrupt occurred and the 
communications ECB was posted, ) 
OC | 1) Mode message was specified, input is not from the terminal, second level messages are 
| chained and user has specified no pause. 
2) Prompt message was specified and either the user has specified no prompt or input is 


from a command procedure, 


| 
10 | Nowait was specified for the TPUT option and the output was not sent and input not received, 
14 | Input was not received, 
18 | Invalid parameters, 
IC | A conditional GETMAIN was issued and no space was available. 
{ 
IK JEFT45 | 00 | Normal, 
| 
04 | A line was successfully obtained from an in-storage list, 
| 
| 08 | The communications ECB was posted and there was no successful completion of a TGET, 
| OC | 1) Fot a prompt request -- either the UPT specified no prompt, or the current source of 
| input was a procedure, 
| | 2) Fer a mode request -- the current source is non-terminal; no pause was specified in the 
| : UPT and a second level informational chain exists, 
| 10 The nowait option had been specified and no space was available in the TIOC output buffer, 
| 
| 14 ' The nowait option had been specified and no line was available in the TIOC input buffer. 
| | 
| 


18 | PUTGET input parameters were invalid, | 
| Ve oe 


Figure 14. Return Codes: Terminal I/O Service Routines (Part 1 of 2) 
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Return Code 


Routine : 
, Hexadecimal 


IK JEFT45 IC 
(continued) , 
IK JEFT52~ ; 00 


IKJEFTS3 00 


IK JEFTS4 00 


IK JEFTSS 
04 


08 


IK JEFT5S6 
04 


08 


Meaning 


A GETMAIN was issued and no space was available. 


Normal, 


The error codes provided by TERMOUT are returned to the caller by this routine, 


Normal. 


No Error Codes. 


Normal, 
Invalid parameters, 


GETMAIN failure. 


A line was obtained from the terminal, 

A line was obtained from a list. 

An ECB was posted as a result of an attention interrupt. 

“nowait" was specified as a TGET option and a line could not be obtained from TGET. 
An EOD (End of Data) condition from a list. 

Invalid parameters were supplied to TGET or to the service routine. 


A conditional GETMAIN was executed and no space was available. 


Normal. 
Attention interruption -- ECB posted. 
NOWAIT specified, no line put out, 


Invalid parameters. 


Figure 14. Return Codes: Terminal I/0 Service Routines (Part 2 of 2) 
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Part 3: Command SCAN and PARSE Service Routines 
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Section 1: Introduction 


Command scan and parse search the command buffer for TSO commands and 
their parameters. In general, command scan is invoked by the terminal 
monitor program while parse is invoked by TSO command processors. 
Command scan is also invoked by the TEST command processor and by other 
TSO command processors that process subcommands. 


Command scan searches the command buffer for question mark, command 
name, Or null line. If syntax checking is requested, command scan 
checks the command name to be sure that it starts with an alphabetic 
character and contains no more than eight alphameric characters. If 
syntax checking is not requested, command scan assumes that the first 
alphabetic character in the buffer is the start of a command name. 
Command scan translates the command name to uppercase and updates the 
buffer offset to point to the first parameter or to the end of the 
buf fer. 


Parse searches the command buffer for command parameters, checks them 
for correct syntax, translates them to uppercase, and presents them to a 
user-supplied exit routine for validity checking. If a parameter is 
invalid, or if a required parameter is missing, parse can either prompt 
the terminal user to enter the parameter or supply a default value. 


As supplied with TSO, the command scan and parse service routines 
reside in SYS1.LINKLIB and execute in the user‘’s foreground region with 
the protection key assigned to that region. The installation may choose 
to make command scan and parse resident in the TSO link pack area 
(TSLPA) in the region assigned to the Time Sharing Control Task (TSCT). 


L 
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Section 2; Method of Operation 


This section describes the method of operation of the command scan and 
parse service routines. It includes the following method of operation 
diagrams: 


e Method of Operation Diagram 13: Command Scan and Parse Service 
Routines (Overview) -- which shows the basic functions performed by 
command scan and parse. 


e Method of Operation Diagram 14: Command Scan Service Routine -- 
which shows how command scan searches the command buffer for TSO 


commands. 

e Method of Operation Diagram 15: Parse Service Routine -- which 
shows how parse searches the command buffer for TSO command 
parameters. 


e Method of Operation Diagram 16: Parse Initialization -- 
which shows how parse sets up the parameter descriptor list (PDL). 


e Method of Operation Diagram 17: Searching for IKJPARS Positional 
Parameters -- which shows how parse searches the command buffer for 
IKJPARS positional parameters. 


e Method of Operation Diagram 18: Searching for IKJPARS Positional 
Parameters ~-- which shows how parse searches the command buffer for 
IKJPARS2 positional parameters. 


and Subfields -- which shows how parse searches the command buffer 
for keyword parameters and subfields consisting of positional and/or 
keyword parameters. 


e Method of Operation Diagram 19: Searching for Keyword Parameters 


Each method of operation diagram includes a cross-reference table to 
help you find the appropriate program description or assembly listing. 


Overview 


Method of Operation Diagram 13 shows the shows the basic functions of 
command scan and parse and their use by the terminal monitor program, 
the TEST command processor, and other TSO command processors. Briefly, 
here is what happens: 


e The terminal monitor program (or TEST command processor) obtains a 
line of input, which is assumed to contain a TSO command and its 
parameters. 


e The terminal monitor program (or TEST command processor) links to 
command scan and passes it the address of the buffer. 


e Command scan searches the buffer for a command name, updates the 
buffer offset to point to command parameters (if any), and returns 
control to the calling program. 


« The terminal monitor program (or TEST command processor) receives 


the address of the command name and gives control to the appropriate 
TSO command processor. ) 
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e'The TSO command processor links to parse and passes it the address 
of the buffer. 


e Parse searches the buffer for parameters, builds a list of 
parameters found, and returns control to the calling program. If 
required parameters are missing, parse prompts the terminal user to 
enter the parameters or supplies default values. 


e The TSO command processor processes the command according to the 
parameters received. 


e When the TSO command processor completes, it returns control to the 
terminal monitor program (or TEST command processor) and the 
sequence is repeated. 


Command Scan Service Routine 


Method of Operation Diagram 14 shows how command scan searches the 
buffer for question mark, command name, or null line. It includes a 
cross-reference table to help you find the appropriate flowchart or 
assembly listing. 


ENTRY TO COMMAND SCAN 


The entry to command scan is by a LINK (or LOAD/CALL) macro instruction 
to entry point IKJSCAN in load module IKJSCAN. 


INPUT TO COMMAND SCAN 


On entry to command scan, register 1 points to the command scan 
parameter list (CSPL), which includes the following information: 


e The address of the user profile table (UPT). 
e The address of the environment control table (ECT). 


e The address of the calling routine’s event control block (ECB). 
(Command scan does not use the addresses of the UPT, ECT, and ECB.) 


e The address of a flag word set as follows: 


hoe ee tsk Uy eg OA eg ae OE eee Se ee ea, ee eg egg 1 
| Flag | Meaning | 
------- }------------------~-~----------------------------------------4 
X°O00* |Check the syntax of the command name. | 
| %'80" [Do not check the syntax of the command name. | 
Bc Oh a a ae ee ee Se paneer ete ee J 


(See “Checking Command Syntax" in this section.) 
® The address of the command scan output area (CSOA) which is set by 
command scan to indicate the results of the search. (See "Output 
from command scan” in this section.) 


e The address of the command buffer (CBUF). 
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SEARCHING FOR COMMANDS 


Command scan searches the buffer for commands beginning at the current 
buffer offset. If the first character is a question mark, no further 
searching is necessary. Otherwise, command scan searches the buffer 
until it finds a command name or until it reaches the end of the buffer. 
It assumes the command name to Start with the first non-separator 
character and to end just before the next separator character. See 
Figure 15 for a definition of character types recognized by command scan 
and parse. 


Unless syntax checking is requested, command scan does no further 
checking and assumes the command name is correct. 


CHECKING COMMAND SYNTAX 


The calling program can request syntax checking by setting the flag word 
to X'00*°. iSee "Input to Command Scan"* in this section.) 


If syntax checking is requested, the command name must meet the 
following requirements: 


The first character must be an alphabetic or a national character. 
The other characters must be alphabetic or numeric. 

The length must not exceed eight characters. 

The delimiter must be a separator character. 


See Figure 15 for a definition of character types recognized by command 
scan and parse. 


TRANSLATING COMMANDS TO UPPERCASE 
Command names are translated to uppercase. The other characters in the 
buffer are not translated. 


‘OUTPUT FROM COMMAND SCAN 


On return from command scan, the command scan output area (CSOA) 
contains the following information: 


e The address of the command name in the buffer. 


e The length of the command name. 
®e Flags set as follows: 


=f 
| 
| 
! 
| 
| 
| 
| 
| 
! 
| 
| 
| 
1 
| 
! 
! 
| 
| 
| 
| 
i 
{ 
i 
| 
t 
Paw] 


Buffer Offset { 


: 
| x*sa° |Command name is valid; [Points to first parameter. | 
| | buffer includes parameters. | [ 
| | | 
| X'4O! {Command name is valid; |Points to end of buffer. [ 
| |buffer does not include [ | 
| | parameters. { 1 
| | | | 
| x" 20° |Command name is a question |Unchanged. | 
| | mark. | | | | 
| x*10° | Buffer contains null line; |Points to end of buffer. | 
| [mo non-separator characters. | | 
| | | | 
| x'os! |Command name is | Unchanged. | 
| |syntactically invalid. | | 
Ea tos te Ee ae ae ee Ne bee eet Sol a raf ere AER nD ES aI ES eee J 
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CHARACTER 


Horizontal Tab 
Blank 

Comma 

Dollar Sign 
Number Sign 


At Sign 


New line 

Period 

Left parenthesis 
Right parenthesis 
Ampersand 
Asterisk 
Semicolon 
Minus sign, hyphen 
Slash 

Apostrophe 
Equal sign 

Cent sign 

Less than 
Greater than 
Plus sign 

Logical OR 
Exclamation point 
Logical NOT 
Percent sign 
Dash 

Question mark 
Colon 


Quotation Mark 


Figure 15. 


CHARACTER TYPE 


National | Alphabetic 


Separator 


| Numeric 


5 Oa 


YA 


Command 


Delimiter 


Delimiter Special 

AK X 

X x 

X X 

x X 

X X 
X 

Xx X 

X X 

X X 

Xx X 

X x 
X 
X 
X 
X 
X 
X 
X 
Xx 
Xx 
xX 
xX 
Xx 


Character Types Recognized by Command Scan and Parse 
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RETURN TO CALLING PROGRAM 


Command scan issues a RETURN macro instruction to return control to the 


calling program. At exit, register 15 contains one of the following 
return codes. 


ee am a a SR A a a 
Code _ | Meaning | 
------ }~-------------------------------+---------+------------------f 
X'Q" |No errors found. | 

| | 
X'4* |Invalid input parameters. | 
ee eee! Da oe a a a se a at a a ek le ee 


Parse Service Routine 


Method of Operation Diagram 15 shows the basic functions of parse and 
their use by the TSO command processors. It includes a cross-reference 
table to help you find the appropriate assembly listing. 


Parse searches the command buffer for two main classes of parameters: 


e Positional parameters -- which must appear in a certain order. 


e Keyword parameters -- which can appear in any order but must follow 


all positional parameters. Keyword parameters may have subfields 
which include positional parameters and/or keyword parameters. 


Briefly, here is what happens: 


e The TSO command processor builds a parameter control list (PCI) that 


describes the parameters expected. That is, it describes acceptable 
values and defaults. 


The TSO command processor links to parse and passes it the address 
of the parse parameter list (PPL), which contains the address of the 
PCL, the address of the command buffer, and the address of a word 
where parse will put the address of the parameter descriptor list 
(PDL). 


Parse searches the command buffer for correct parameters and builds 
a PDL that describes the parameters found. 


Parse places the address of the PDL in the word pointed to by the 
PPL and returns control to the TSO command processor. 


Other points made in the simplified method of operation diagram will be 
briefly mentioned here: 


e The TSO command processor uses system macro instructions to build 
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the PCL. (See Figure 16 for a brief description of these macro 
instructions.) kach macro instruction generates one parameter 
control entry (PCE). 


The TSO command processor uses system macro instruction IKJRLSA to 


free main storage obtained by parse for the PDL and for buffers used 
when prompting the terminal to re-enter parameters. 
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J 


9 


| IKJPARM |Marks the beginning of the PCL. Gives the | 
| | length of PCL and length of PDL. Gives offset | 
| jto next IKJKEYWD, IKJSUBF, or IKJENDP PCE. | 
‘ IKJ IDENT {eseeier ae a positional parameter in the form of | 
Ja character string with optional restrictions on| 
[the first character, other characters, and { 


| keyword or a reserved word field. Specifies the| 
| options associated with this name. | 


| 

| 

| 

| | length. | 
fs ee eee 
| IKJPOSIT |Describes a positional parameter which includes | 
| {a delimiter as part of its syntax. | 
}---------------------}---~------------------------+--------+---------- 1 
| IKJTERM |Describes a positional parameter that may bea | 
| |constant, variable or statement number. 
|-------------~------- }-~--------------------------------------------- 4 
| IKJOPER | Describes an expression consisting of two | 
| {operands and an operator. | 
}~--------------------- }---------------------------------------------—- 4 
| IKIJRSVWD {Is used with the IKJTERM macro to describe a | 
| | figurative constant, or with the IKJOPER macro | 
| {to describe the operator in an expression, or by| 
| |itself to describe a reserved word parameter. | 
|~------------------— {----------~----------=-------------------------- ! 
| IKJKEYWD |Marks the beginning of a keyword field. | 
| | Specifies a default, if there is one, for the | 
| | field. | 
facaaaraag o> mea Seemee eager Gr OREN rrr eT ere 
| IKJINAME |Describes one of the eligible names for a | 
| 

| 


Pe eS Se ee Se ea a a ee ee eos 
| IKJSUBF |Marks the beginning of a subfield and the end of] 
| {a previous subfield. Gives offset to next | 
| | IKJKEYWD, IKJSUBF, or IKJENDP PCE. | 
| ---------------------}----------------------------------------------- -{ 
| IKJENDP eas the end of the PCL. | 
fas sea Se Se 


j|Note: For a more Scuntete discussion of the parse macros, refer to | 
{the publication, OS/VS2 TSO Guide to Writing a Terminal Monitor | 
| Program or _ a Command Processor, GC28-0648. 


Figure 16. Brief Description of Parse Macro Instructions 
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ENTRY TO PARSE 


The entry to parse is by a LINK (or LOAD/CALL) macro instruction to 
entry point IKJPARS in load modul? IKJPARS. 


INPUT TO PARSE 


On entry to parse, register 1 points to the PPL, which includes the 
following information: 


The address of the user profile table (UPT). 

The address of the environment control table (ECT). 

The address of the calling routine’s event control block (ECB). 
The address of the environment control table (ECT). 

The address of the calling routine's event control block (ECB). 


(Parse does not use the address of the UPT, ECT, and ECB. 


e The address of the parameter control list (PCL). (See below.) 
e The address cf a word where parse puts the address of the parameter 
descriptor list (PDL). 


(See "Output from Parse" in this section.) 


e The address of the command buffer (CBUF). 
e The address of a user work area. 


The PCL is the major input to parse. It consists of Parameter 
Control Entries (PCEs) that describe the parameters expected and 
determine the operations to be performed by parse. 


SET UP AND INTIALIZATION 


When parse locates the IKJPARM PCE, it performs various initialization 
functions. 


Method of Operation Diagram 16 (foldout) shows what parse does during 
set up and initialization. It includes a cross-reference table to help 
you find the appropriate assembly listing. 


Briefly, here is what happens: 


e Parse gets main storage for the PDL and puts its address in the 
answer area provided by the calling routine. See “Input to Par::-:* 
in this section. 

e Parse gets main storage for the parse work area (PWOxK) and first 
recurse work area (RWORK) and initializes them. Parse gets another 
recurse work area each time it processes subfield. 

°e Parse loads the PUTLINE and PUTGET service routines. 


e Parse loads IKJPARS2 if necessary. 


When initialization is complete, parse is ready to search for 
positional parameters. 


126 OS/VSZ Terminal Monitor Program (VS2 Release 1) 


SEARCHING FOR POSITIONAL PARAMETERS 


Parse recognizes two classes of positional parameters: 


e Simple ones -- non-delimiter dependent parameters. These are 
described by IKJIDENT PCEs. 


e Complicated ones -- delimiter dependent parameters. These are 
described by IKJPOSII PCEs. 


See Figure 17 for a description of each type of positional parameter. 


Method of Operation Diagram 17 (foldout) shows how parse searches for 
positional parameters described by IKJIDENT, IKJPOSIT, IKJTERM, IKJOPER, 
or IKJRSVWD PCEs. It includes a cross-reference table to help you find 
the appropriate assembly listing. 


Briefly, here is what happens: 


e Parse locates an IKJIDENT, IKJPOSIT, IKJTERM, IKJOPER, or IKJRSVWD 
PCE and branches to the appropriate processing routine. 


e Parse searches the buffer for the parameter. If the parameter is 
missing, Parse checks the PCE to see if the parameter is necessary, 
or if there is a default. 


- If the parameter is necessary, parse prompts the terminal for the 
parameter. 

- If there is a default, parse supplied the default. 

- If the parameter is not necessary, parse locates the next PCE. 


e If the parameter is correct, parse builds a PDE for the parameter 
and translates the parameter to uppercase. If a list is being 
processed, parse builds a PDE for each element in the list. 


e If the calling routine has specified a validity check exit, parse 
gives control to a validity check exit routine. If a range is being 
processed, the complete range is passed to the validity check exit 
routine. If a list is being processed, each element in the list is 
passed to the validity check exit routine. 


- If parse finds an error it prompts the terminal user to reenter 
the parameter, and erases the invalid PDE. the parameter, and 
erases the invalid PDE. 
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Macro 


= 
|Type of 


| Instruct ion| Parameters| Description | 


| 1 KJI DENT 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Figure 17. 


+ t 
|Positional|The IKJIDENT PCE describes a positional 
| character |parameter in the form of a 


[string 


ap oe ee ee ee ee aoe ee ee OO es Oe ee ee ee 2 ee 


—" oe we eee Ow ee 


{Any of the|The IKJPOSIT PCE describes a positional 
| following: | parameter of one of the following types: 


| DELIMITER {A delimiter parameter is a self-defining 


jcharacter string with optional restrictions on 
[the first character, other characters, and 
[length. The IDENT parameter may be an 
jasterisk. 


|The following character types are recognized 
[for the beginning chatacter and additional 
| characters: 


[ALPHA -- An alphabetic or national character. 


| NONATABC -- Alphabetic characters, no national 
jcharacters. 

I 

| NONATNUM -- Alphameric characters, no national 
| characters. 


| 
| NUMERIC -- A digit, 0-9. 


| 
| ALPHANUM -- An alphabetic character, national 
{character, or digit. 


[ANY -- Any character other than a blank, coma, 
{tab, semicolon, or carriage return character. 


|delimiter character used to delimit a string. 
{It may be any character other than an asterisk, 
[left parenthesis, right parenthesis, semicolon, 
|blank, comma, tab, carriage return character, 
Jor digit. A self-defining delimiter character 
Jis represented by the symbol . The delimiter 

| parameter is used only conjunction with the 
[string parameter discussed below. 


iA string is the group of characters between two] 
[alike self-defining characters, such as: 


| 
| Astring A 
| 


| 
| 
{of the group of characters between a | 
|self-defining delimiter character and the end | 
{of a logical line, such as: | 

| 

| 


| 
| Astring 


Types of Positional Parameters (Part 1 of 9) 
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T 
| Macro |Type of | | 
| Instruction| Parameters| Description | 


-----------}---------- }------~----------------------------------------] 

| IKJPOSIT | STRING |The same self-defining delimiter character may | 

| (cont .) | (cont. ) |be used to delimit two continuous strings, such| 
Jas: 


| 

| Astring Astring 4 

| Astring A string 

r null string is defined as two contiguous 
[delimiters or a delimiter and the end of the 
| logical line. If the string is required, a 
[null string must be entered as two contiguous 
| delimiters. 


| If the next nonblank character scanned is not a 
|valid self-defining character, the string is 

| considered missing. A string received froma 
|prompt or default must not include the 

| delimiters. 


| If the delimiter is a quote and the SQSTRING 
[flag is on in the PCL, the string is processed 
Jas a quoted string (see QSTRING below). 
VALUE |A value consists of type-character followed by 
|a string enclosed in quotes, such as: 


~---------------- 


| 
| X‘ string’ 
| 


| | 
| | 
| | 
| | 
| | 
| |The type-character must be an alphabetic or | 
| |mational character. The string may consist of | 
| |any combination of enterable characters of any | 
| |length. The ending quote may be left off the | 
| | string in which case the end of the string is | 
| [the end of the logical line. A message is | 
| | issued indicating the end quote is assumed. | 
| |Two successive single quotes are considered | 
| {part of the string, such as C‘a‘*'tb’. The value| 
| J}is considered missing if the first character is| 
[ Jnot an alphabetic character of if the following| 
| |character is not a quote. The type-character | 
| | preceding the quoted string is always | 
| Jtranslated to uppercase. | 
| ADDRESS |There are several forms of the address 

| |parameter: an absolute address, a relative 

| |address, a general register address, a 

| | floating-point register address, a symbolic 

| Jaddress, a qualified address, an indirect 

| |address, and an address expression. 
| 
| 
L 


{Absolute address -- One to six hexadecimal 
[ages followed py a plus Sign. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


fee cee ee ee ee ee ee eee eee oie 


Se ee een renee 
Figure 17. Types of errs Parameters (Part 2 of 9) 
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i to oe cree enh te eg ps a ee ot ee eo eo 1 
Macro j|Type of | | 


| Inst ruction|Parameters| Description | 
-~--------}---------- }-----------------------------------------------] 

|ILKJPOSIT | ADDRESS |Relative’ address -- One to six hexadecimal 

| (cont. ) | (cont.) | digits preceded by a period. 


|General register address -- A decimal integer 
|in the range 0-15 followed by the letter "R". 


|"R" may be upper case or lower case. 


| Floating-point register address -- An even 
|decimal integer in the range 0-6 followed by 


{the letter "D" (for double precision) or the 
Jletter “"E" (for single precision). The "E" and 
|"D" may be upper case or lower case. 

|Symbolic address -- Any 1-31 character 
}combination of the alphameric character: and 
{the break character, of which the first 
jcharacter is an alphabetic or national 

| character. 


| 
| Qualified address -- A qualified address has 
[the following format: 


| (loadname].entryname -symbolic 
| address 
| -relative 
{£3 - Optional address 
| loadname 


any combination of eight or fewer alphameric 
characters of which the first character is 
an alphabetic or national character. 


entr yname 
same syntax as a load.name, (but must be 
preceded by a period as illustrated above). 


symbolic address 
defined above, (but must be preceded by a 
period as illustrated above). 


| 
| 
| 
| 
{ 
| 
| 
| 
i 
| 
{relative address 

| defined above, (but must be preceeded by a 
[ period, as illustrated above). 

| 

| Indirect address -- An indirect address is an 
{absolute, relative, symbolic, or general 
[register address followed by from 1 to 255 
Jpercent signs, such as: 


A. KAR 


|Address expression -- An address expression has 
[the following format: 

| 
jaddress(%...Jtexpression value(%...] 
| (texpression value[%...]...] 


—z 
Se ee ee ee ee ee ee ee oO ss ee es ee ee ae es OS ees ees SE ee Oe ee ee ee eee ee oe eee eee ee oe oe oe es eee ee ee 
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| 
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| 
| 
| 
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| 
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| 
| 
| 
| 
| 
| 
| 
| 
| 
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beret a eo a ee ae al a a a aaa 1 
|Macro [Types of | 


|Instruction| Parameters |Description 


| 

| 
cp cea a ch Oh Si Nh Sag a ha we ea ln Seed ee re | 
|IKJPOSIT |ADDRESS  jJ|address | 
| (cont. ) | (cont. ) | an absolute, relative or symbolic address. | 
| | | address may be used but it must have | 
| | | indirect address notation, that is, it must | 
| | | be followed by at least one percent sign. | 
| | | | 
| | | expression value | 
| | | 1-6 hexadecimal digits or 1-6 decimal digits| 
| | followed by the letter "N". "“N”" may be | 
| | | uppercase or lowercase. | 
| | | | 
| | | There is no limit to the number of | 
| | | expression values in the address | 
| | | expression. | 
| | | | 
| | {Blanks are not allowed within any form of the | 
| | jaddress parameter. | 
| | | | 
| | | £ J] - Optional l 
| fo Seeseeaa 0 ee } 
| | PSTRING {A parenthesized string is a string of | 
| | |characters enclosed by a balanced set of | 
| [ | parentheses, such as: | 
| | | | 
| | | (string) ‘| 
| | | | 
| [ [fhe string may consist of any combination of | . 
| | Jenterable characters of any length, with one [ 
| | Jrestriction: If it includes parentheses, they | 
| | {must be balanced. The enclosing right | 
| | |parentheses may be eliminated if the string | 
| | |ends at the end of the logical line. A message| 
{ | [is issued indicating it is assumed. | 
| | | 
| | |A null string is defined as a left parenthesis | 
| | followed by a right parentheses or a left | 
| | |parentheses at the end of the logical line. It| 
| | |may be entered in either form at all times. | 
| | | 
| | |A parenthesized string received from a prompt | 
| { |or default must include at least the enclosing | 
| | | left parenthesis. { 
| |----------}~-----~------~-- ------------------------------- { 
| | USERID {A userid consists of an identification [ 
| | | optionally followed by a slash and a password. | 
| | |The format is: | 
| | | | 
| | | identification [{/password] | 
| | | | 
i | | identification | 
| | | any combination of seven or fewer alphameric| 
| | | characters, the first of which must be an | 
| | | alphabetic or national character. | 
| | | | 
| | | password | 
| | | any combination of eight or fewer alphameric | 
| { | characters. 
bos Se aa i tes a Sa a a a a a ee a ae fan eed J 
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|Macro |Type of { 
| Instruct ion| Parameters| Description 


+ 

| IKJPOSIT | ADDRESS |Blanks, can be inserted between the 

| (cont .) | (cont. ) | identification and the slash and between the 
[slash and the password. 


{If only the identification is entered, no 
| prompting for the password takes place, whether 
Jor not the userid parameter is necessary. If 
[the identification is entered followed by a 
{slash in bypass mode. The terminal user may 
jenter a password or reply with a null line. 
|See PUTGET service routine external 
|specifications for an explanation of prompting 
jin bypass mode. 

DSNAME {The data set name parameter has three possible 
| formats: 


| dsname[ (membername) J] [/password] 


a ee ee ee ee ee 


{dsname] (membername) [{/password] 
*‘dsname [membername] ' [/password 
C ] 


| 
| 
| 
| 
| 
| | 
| | 
| | 
| 
| | 
| | 
| dsname | 
| a qualified or unqualified name. An | 
| unqualified name is any combination of eight| 
| or fewer alphameric characters, the first of| 
{ which must be an alphabetic or national [ 
| character. A qualified name is made up of | 
| sevral unqualfied names; each name is | 
| separated by a period. A qualified name | 
| including the periods, can be as many as 44 | 
| characters long. | 
| 
| membe rname | 
| 1-8 alphameric characters, the first of | 
{ which must be an alphabetic or national | 
| character. [ 
| | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| . 


|The data set name parameter is considered 
[missing if the first character is not a single 
| quote, alphebetic or national character, or 
Jleft parenthesis. 


|The password may be any alphameric combination 
Jof eight or fewer characters. If the slash and 
| password are not entered, no prompting for the 
| password takes place whether or not the dsname 
{parameter is required. If the slash is entered 
jand not the password, a prompt for the password 
Joccurs in bypass mode. The terminal user may 
jenter a password or reply with a null line. 
|See PUTGET Service Routine for an explanation 
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ape beeen earats aca aa aR aa a a a Te 1 

|Macro [Type of | 

| Inst ruction|Parameters| Description 

| LKJPOSIT DSTHING |A data set thing is a dsname parameter as 

| (cont .) |defined above except that an asterisk may be 
|substituted for an unqualified name and for 
|each qualifier of a qualified name. 

| OSTRING {A quoted string is a string of characters 

| | 

| | 

| | 

{ |The string may consist of any combination of 

| |enterable characters of any length, with one 

| |restriction: If the user wishes to enter 

| | quotes within the string, two successive quotes 

| |must be entered for every single quote desired. 

| |One of the quotes is removed during the parse. 

[ |The ending quote may be eliminated if the 

| {string ends at the end of the logical line. A 

| 

| 

| 

| 

| 

| 

| 

| 

| 


Poe 


‘string' 


|message is issued indicating the end quote is 

| assumed. 

| 

{A null quoted string is defined as two 

[contiguous quotes or a single guote at the end 

Jjof the logical line. It may be entered in 

Jeither form at all times. 

. quoted string received from a prompt must 

| include at least the enclosing left quote. 

| SPACE {This is a special purpose parameter for the TSO| 

JEDIT command. It allows a string parameter | 

[which directly follows a command name, to be | 

| entered without a preceding self-defining | 

[|character. If the delimiter of the command | 
| 
| 
| 
| 


| 

| 

| 

| jmame is a tab, the tab is the first character 
[ jof the string. The string always ends at the 
| [end of the logical line. The space parameter 
| {must be followed by a string parameter. 

t 


2p ee ee es ee eee eee ee ee ee ee ee Oe ee eee en ee ee ees se eae ee eee 


[Any of the| The IKJTERM PCE describes a positional 
[following |parameter of one of the following types: 


|CONSTANT |There are several forms of the constant 
| parameter. 


|Fixed-point numeric literal - Constants of a 
[string of digits (0 - 9) preceded optional by a 


| 
| 
| 
| 
[ |sign (+ or -), such as: 

| 

| | 41234.43 

ae literal may contain a decimal point 

[ janywhere in the string except as the rightmost 
| 

| 

| 

| 

| 

| 

L 


j|character. The total number of digits can not 
[exceed 18. 


Floating-point numeric literal - has the form: 


4#1234.56h410 
pre ee ee Os a a ee ee 
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|Macro | Type | | 


ee ce ee es ee we ee a ae oe eee oe ee ee ee ee ee ey, ee ce cee cr cc ee ee tn ee wc a a a ss Sw oe 


| IKJ TERM | CONSTANT are literal is a string of digits (0 - 9) | 
| (Cont. ) | (Cont. ) | preceded optionally by a sign (+ or os) and | 
|must contains a decimal point. This is | 

Jimmediately followed by the letter E and then a| 
Jstring of digits preceded optionally by a sign. | 
| Embedded blanks are not allowed. The string of | 
[digits preceding the E cannot be greater than | 
{16 and the string following the E cannot be { 
[greater than 2. | 
| 

enwninee te literal - Constants of a string of | 
[characters from the EBCDIC character set | 
|} excluding the quote and enclosed in | 
[quotes such as: | 
| "Numbers (123) and letters are OK)'° 
| | 
{rhe length of the string excluding apostrophes | 
jmay be from 1 to 120 characters in length. | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


ia deacdge constant - May be one of a set of 
| keywords supplied by the caller of the parse 
| routine such as: 
| test123 
| 
[A figurative constant consists of a string of 
[characters up to a length of 255. Embedded 
jblanks are not allowed. All characters of the 
{ EBCDIC set are allowed except the blank, comma, 
jtab, semicolon, and carriage return. 
ea ee Ra Cy ay Oe ane rae De age ce ere oe POR en Ae RN SR ere Nea ICY A de r : y 
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+ 
VARIABLE |A variable parameter has the form: 


[program-id.Jdata-name OF qualification 
IN 
(subscript) 


Data-nameé - consists of a maximum of 80 
characters of the set: 


A through Z (alphabetic) 
0 through 9 (numeric) 
- (hypen) 


such as: 
My-dataset-123 


cee Oe gee ee oe cee ee ge Oe ss OO 2 2S ee 


|The data-name cannot begin or end with a hyphen 
{and must contain at least one alphabetic 

| character. 

| 

| Program-id - Consists of the first eight 
|characters of a program identifier followed by 
Ja period. The first character must be 

| alphabetic (A - Z) and the remaining characters 
|alphameric (A - Z or 0 - 9) such as: 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
L 


| Here55.My-dataset 
Se a 5 oe Dc he ee a ee ee 
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7 
Macro |Type of | | 


| IKITERM | VARIABLE [Qualification - Is applied by placing after 

| (cont. ) | (cont. ) |data-name one or more data-name(s) preceded by 

[the reserved words IN or OF such as: 
My~dataset-123 OF Your-dataset-456 

The number of qualifiers is limited to 255. 

Subscript ~- Consists of a data-name with 

subscripts enclosed in parentheses following 

the data-name such as: 


Your-dataset-456 (My-dataset-123) 


{A separator between the data-name and 
[subscripts is optional. Subscripts are a list 
Jof constants and/or’ variables. The number of 
[subscripts is limited to 3. 

ee fee aa ea oa ene ee eee eee eee 
| STATEMENT |A statement number has the following form: 

| NUMBER 


ee ee ee ee we ce es ee Se ee a= See oe 


[program-id.Jline number[.verb number] 


| 

| 

| 

| 

{An example is: 
| 

| Here.23.7 

| 

| Program-id ~ Consists of the first eight 
[characters of a program identifier followed by 
|a period. The first character mst be 
Jalphabetic (A - Z) and the rmeaining characters 
Jalphameric (A - Z or O - 9). 


| Line number - Consists of a string of digits (0 
|- 9) and cannot exceed a length of 6 digits. 


| 
| Verb number - Consists of one digit (0 - 9) 
| preceded by a period. 


a rs cr mr ec er rr it Sr rr gr Se ie is or ee og, ee ge sos ope 


|Embedded blanks are not allowed. 


| 
| 
| 
| 
I 
| 
| 
| 
| 
| 
| 
oa 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
T 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
t 
| 
| 
| 
! 
| 
| 
| 
| 
| 
| 
| 
| 
l 
( 
{ 
| 
| 
! 
( 
! 
{ 
! 
( 
{ 
! 
! 
| 
| 
! 
{ 
| 
! 
| 
( 


| IKJOPER EXPRESSION|The IKJOPER PCE describes an expression that 


{has the form: 
(operand1 operator operand2) 


| 
| 
| 
|The operator in an expression shows a 
|relationship between the operands, such as: 
| 

| 

| 


(abc equals 123) 


[An expression must be enclosed in parentheses. 
{An expression is defined by the IKJOPER macro. 
|The operands are defined by the IKJTERM macro 
J}and the operator by the IKJRSVWD macro. 


-—— — —— — — 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
aaa 
| 
| 
| 
| 
| 
| 
| 
| 
| 
1 
| 
| 
1 
{ 
| 
i 
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| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
| 
| 
1 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
| Instruction|Parameter |Description | ) 
|--~-------- {----------}----------------------------------------------- { 
IKJRSVWD |RESERVED |A reserved word has three uses depending on 
| WORD [the presence or absence of operands on the 


| IKJRSVWD macro. The uses are: 


[a. When used with the RSVWD keyword on the 

| IKJTERM macro, the IKJRSVWD macro identifies 
| the beginning of a list of reserved words 

| anyone of which can be entered as a 

i constant. 

| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
b. When used with the RSVWD keyword on the { 
IKJOPER macro, the IKJRSVWD macro identifies | 
the beginning of a list of reserved words | 
anyone of which can be entered as an | 
Operator in an expression. | 

| 

| 

| 

| 

| 

| 

| 

| 

| 


| 
| 
| 
jc. When used by itself, the IKJRSVWD macro 
| defines a positional reserved word 

| parameter. 

| 

| 

| 

| 


Note: The IKJRSVWD macro is followed by a 
list Of IKJNAME macros that contain all of 
the possible reserved words used as 
constants or operators. 
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Lists and Ranges 


Some positional parameters may be entered in the form of a list ora 
Yange or a list of ranges. 
e A list is one or more of the same type of positional parameter 
enclosed in parentheses. For example: (parameter parameter) 
e A range is two positional parameters separated by a colon. For 
example: parameter: parameter 


The following positional parameters may be used in a list form: 
value, address, userid, dsname, dsthing, and positional character 
String. A list may not contain items with unmatched left and right 
parentheses except that the closing right parenthesis may be omitted at 
the end of a logical line. 


The following positional parameters may be used in the form of a 
range or a list Of ranges: address, value, and positional character 
string. 


Validity Check 


After the PDE is built, the PCE is checked to see if there was a 
validity check routine and, if so, the validity check routine is entered 
by a branch and link. 


At entry to the validity check routine, register 1 points to the 
validity check parameter list (VCEPARAM) which contains the following 
information: 


e The address of the PDE. 

e The address of a work area built by the TSO command processor. 

e The address of a second-level message (provided by the validity 
check routine) which is initialized to X'FFOO0O0000'. 
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Cn return to parse, register 15 contains the following return code: 


aan a aaa aa a a aaa ces 1 
| Code | Meaning | 
|-------- }----~-------------------------------------------------------- 
| X*O0O* |The parameter is valid, continue. 
| .X*'O4* |The parameter is invalid, write an error message, prompt the | 
| {terminal user to reenter it. | 
| %X*0Q8* |The parameter is invalid, an error message was issued, prompt | 
| {the terminal user to reenter it. | 
| %*10° |The IKJTERM macro is chained under the IKJOPER macro, and the| 
| [data field that follows is to be scanned as a subscript. [ 
| xX*OC* |Error forces termination. Cleanup and return to TSO command | 
| | processor. ; | 
bi a ey a RE Pern age eye ree ape oe at Ny Sao Pe gad EN ee MAR en ry J 


SEARCHING FOR KEYWORD PARAMETERS AND SUBFIELDS 


When parse locates an IKJKEYWD PCE, it searches the command buffer for a 
keyword field. The eligible names for a keyword are specified by 
IKJNAME PCES. Keyword parameters may have subfieids that contain 
positional and/or keyword parameters. If so, an IKJSUBF PCE marks the 
beginning of the subfield. 


Method of Operation Diagram 18 shows how parse searches for keyword 
parameters described by IKJKEYWD and IKJNAME PCEs and for subfields 
Specified by IKJSUBF PCEs. It includes a cross-reference table to help 
you to find the appropriate assembly listing. 


Briefly, here is what happens: 


e Parse locates an IKJKEYWD PCE and branches to the keyword processing 
routine (KEYWDP). 

e The keyword processing routine searches the buffer for a keyword and 
compares it to each of the eligible names specified by IKJNAME PCEs. 

e If keyword processing finds a march, parse builds an IKJKEYWD PDE 
and checks the IKJNAME PCE for a subfield. If no match is found, or 
if more than one match is found, parse prompts the terminal user to 
reenter the parameter. 

e If the keyword has a subfield, parse searches for parameters in the 
subfield in exactly the same way that it searches for parameters in 
a field. When it reaches an IKJSUBF PCE or IKJENPD PCE, parse 
returns to processing the main part of PCL. 

e After searching for all of the keyword fields, the keyword 
processing routine checks each IKJKEYWD PCE to see if it has been 
filled. If not, it supplies a default value. (Keyword parameters 
are never required.) 

e When keyword processing reaches an IKJENDP PCE, parse returns to the 
calling routine. 


Method of Operation Diagram 19 also illustrates the following additional 
points: 


e Keyword parameters may be entered in any order. They must follow 
all positional parameters. The first character of the keyword must 
be alphabetic; all other characters must be alphameric. Maximum 
length is 31 characters. See Figure 15 for a definition of 
character types. 

e Parse lets the terminal user enter the fewest number of characters 
required for uniqueness. If the abbreviation is not unique, parse 
writes an “ambiguous keyword" message and prompts the terminal user 
to reenter the parameter. 
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e When the terminal user enters conflicting keywords, the last keyword 
found overrides the previous ones. Note that the last keyword found 
may not be the last keyword entered. If the terminal user is 
prompted for one parameter and enters other parameters, parse checks 
these parameters before continuing to search for parameters in the 
command buffer. 


Subfields 


Keyword parameters may have other parameters associated with them. In 
this case, those parameters are enclosed in parentheses immediately 
following the keyword and for the purpose of syntax checking are known 
as a subfield. In the following subfield, positionali and keyword2 are 
parameters in the subfield of keyword 1: 


ke yword1 (positionall keyword 2) 


The parameters in the subfield are searched for in exactly the same way 


as before. The enclosing right parenthesis can be omitted at the end of 
a line. 


PROMPTING AND DEFAULTING 


Parse searches the command buffer until it reaches the end of the buffer 
If it finds an error, parse gets the address of a default value or 
prompts the terminal user to reenter the parameter. Parse scans the new 
data (with further prompting or defaulting, if necessary) before 
continuing to search the command buffer. 


Figure 18 shows the scanning sequence for a command buffer that 
contains two errors. Note that there was a third error in the data 


received from the second prompt. The search continued until 
end-of-buffer was reached. 


ch 


_ , LEGEND: 
' direction of scan 
xX error 
| 
Reply to second prompt , ee | 


Reply to fist pomp | eer | | fee | 


Command Buffer 


Figure 18. Scanning Sequence for Prompting and Defaulting 
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C 


Parse keeps track of the data obtained by prompting or defaulting by 
means’ of an input stack as shown in Figure 19. Each element on the 
Stack contains a pointer to the last character searched and a pointer to 
the end of the buffer. 


Parse Input Stack 


Current Offset 
End of Buffer 


Current Offset 
End of Buffer 


Unused Space 


Figure 19. Keeping Track of Buffers with the Parse Input Stack 


Buffer 


Already scanned 


To be scanned 


During initialization, parse sets up an input stack large enough to 
hold ten elements. If more elements are necessary, parse sets up new 
Stacks and backward-chains them to the first stack. The current input 
pointer (PIPDLCUR) points to the current stack while the current index 
(PIPDLX) give the offset into the stack. 


MESSAGES FROM PARSE 


Parse uses the PUILINE and PUTGET service routines to write messages to 
the terminal. 


PUTLINE writes informational messages. 
PUTGET prompts the terminal user for a line of input. 


In most cases, PUTLINE and PUTGET are used in succession. For example: 


entered from terminal dataset% 

issued by PUTLINE INVALID DSNAME, dataset% 
issued by PUTGET REENTER - 

entered from terminal datasetl 
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OUTPUT FROM PARSE 


Parse places the address of the PDL in the area provided by the calling ) 
routine. See "Input to Parse” in this section. 


The PDL consists of PDEs that describe the parameters found in the 
command buffer or obtained by prompting or by supplying default values. 


RETURN TO CALLING PROGRAM 


Parse issues a RETURN macro instruction to return control to the calling 


program. At exit, register 15 contains one of the following return 
codes: 


| Normal completion. | 
X*O4* |Unable to prompt for valid parameter. [ 
X*°08* |Processing interrupted by attention interruption. | 
X*°O0C* | Invalid parameters from calling routine. | 
X*10" [No storage available for PDL | 
X°14° | Validity check routine requested termination. | 
X°18° {Invalid parameters passed to an IKJTERM, IKJOPER, or IKJRSVWD| 


{macro instruction. 
a a ed J 


aire ass Till 
- 
© 
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Method of Operation Diagrams 
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Terminal Monitor Program 


Handles TSO Commands 


Links to Command Scan to Scan 
buffer for command, 


Receives pointer to command 
name, 


Gives control to appropriate 
command processor. 


ATTACH 


TSO Command 
Processor 


Processes TSO Command 


Links to Parse to scan buffer for 
porameters, 


Receives pointers to parameters 
in order expected, 


Processes command according to 


parameters received, 


Method of Operation Diagram 13. 
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CROSS REFERENCE TABLE 


The Terminal Monitor Program gets a line of input from the terminal, 
The TMP links to the Commands Scan service routine and passes it the 
address of the Command Buffer. 


The Command Scan service routine scans the Command Buffer for 
a syntactically correct command name, updates the buffer offset 
field, and returns control to the TMP, 


The Terminal Monitor Program receives the address of the correct 
command name and gives control to the appropriate TSO command 
processor, 


The TSO command processor links to the Parse service routine and passes 
it the address of the Command Buffer and a Parameter Control List 
(PCL) that describes the parameters to be expected. 


The Parse service routine scans the Command Buffer for the parameters 
expected, builds a Parameter Descripror List (PDL) that describes the 
parameters found, updates the buffer offset, and returns control to the 
TSO command processor. 


The TSO command processor processes the command according to the 
parameters received, 
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RESULT 
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Buffe: Offset set to: 


Command name is valid; the remainder of the buffer First non-separator character 


following command name. 


is empty (contains only separator characters). 


End of buffer, 


Buffer is empty (contains only separator 


characters). 


Unchanged, 


4 


End of Buffer. 


Command name is 
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CROSS REFERENCE TABLE 


Key Description Routine Label 


Duting initialization, an unconditional GETMAIN is issued for a 
Command Scan Work Area (CSWORK ). 


Separators are skipped to the beginning of a command name, If the 
buffer is empty ot if the first character is a questionmark, the program 
exits, Otherwise the scan continues to the next delimiter, 


If the high order byte of the Flag Word is X'00' the command is syntax 
checked, Otherwise the command name must contain valid, enterable 
characters and end with a delimiter. 


Cotrect command names are translated to uppercase, 


The CSOA is set to indicate the results of the scan and the buffer offset 
is updated as shown in 


5 Command Scan returns to caller. 
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Positional Parameters, Keywords, Subfields 


Note: Other input buffers are obtained when the terminal is prompted 
for additional input. Sec Operation Diagram 8 for a description of 
the Input Stack, 
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CROSS REFERENCE TABLE 


Key Description Routine Label 


Parse gets PCEs from the PCL and constructs PDEs in the PDL, The operations performed depend 
upon the type of PCE being processed, 


1 The IK JPARM PCE determines much of what is done during Parse initialization, It names the PCL IK JEFPOO IK JPARS 16 
and PDL (default name is IKJPARMD ), gives the length of the PCL and PDL, and gives the 
offset in the PCL of the next IKJIKEYWD, IKJSUBF, or IKJENDP PCE, 


2 The IKJIDENT and IKJPOSIT PCEs determine much of what is done during a scan for positional IK JEFPO] 17 
parameters. The parameters must appear in the command buffer in the same order that their PCEs 1K JEFPOO 
appear in the PCL, All positional parameters must come before any keyword parameters. 


3 The IKJKEYWD and IKJNAME PCEs determine much of what is done during a scan for keyword IK JEFPOO 19 
parameters, The IKJKEYWD PCE marks the beginning of a keyword field while the following 
IK JNAME PCEs define eligible names for the keyword, 


Keywords may have subfields that include both positional and keyword parameters, The 
IK JSUBF PCE marks the beginning of a subfield and the end of a previous field, 


4 The IK JENDP PCE marks the end of the PCL. Parse checks to see if the scan is complete before IK JEFPOO ENDFIELD 19 


returning control to the calling routine. 
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PROCESSING 


Parse Service Routine 


1 Sets Up PDL. 


2 Builds Parse Permanent 
Workspace. Builds Parse 
Recursive Workspace, 


3 Loads PUTLINE and PUTGET — 


Service Routines. 


4@ Loads IK JPARS2 Service Routine 
if Required, 


Start Scanning. 


or 


To scan for Positional 
Parameters described 
by the IKJIDENT or 
IK JPOSIT macro 


instructions, 
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Cc 


IK JEFPOO 


Sets up PDL and Parse Work Areas 


ae i ee 


RESULT 


PDL 


PWORK 


PWORK 


——<— =, 
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PUTGET 
Service 
Routine 
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Priv! NIE 
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Service 
Routine 


PARS2 


Service 
Routine 


To scan for Positional Parameters 
described by the IKJTERM, 

IK JOPER or IKJRSVWD macro 
instructions. 
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CROSS REFERENCE TABLE 


1K JEFPOO IK JPARS 
IK JEFPO2 STALOC 
IK JEFPOO 


1 Parse gets main storage for the PDL from subpool:1, The DSECT for the 
PDL is named according to the value specified by the IKJPARM PCE, 
The default name is IKJPARMD, 


IK JPARS 
GETCORE 


IK JEF POO 
IK JEFPO2 


Storage is obtained for the Parse Work Area (PWORK ) and first Recurse 
Work Area (RWORK ) from subpool 0, Both work areas are initialized 
with information from the Parse Parameter List (PPL). 


e Additional Recurse Work Areas are obtained each time a subfield IK JEF POO RECURSE 


is processed, 


IK JEF POO IK JPARS 


The PUTLINE and PUTGET service routines are loaded. 


IK JEFP60 IK JPARS2 


Parse loads IK JPARS2 Service Routine if the [KJTERM, IKJOPER or 
IKJRSVWD macro instruction is coded, 


1K JEFPOO NEXTPCE 


Parse 1s ready to get the next PCE and start the scan. 


Routines, Parse Input Stack, 
Internal Tables, and Work Areas, 
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Parameter Descriptor (PDL) Parse Permanent Workspace ( PWORK ) Parse Recursive Workspace (RWORK ) 


PDL Header Entr 
ul Save Areas, Parameter List for 


Addresses of Data Areas Used by 
Parse when Séarching for Parameters 
ina Subfield, FLAGS which tell 
Parse what to Do Next. 
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“PROCESSING RESULT 


INPUT From Operation 
Diagram 16 Parse Service Routine , IK JPARS 
“set Up and ; Scan Buffer For Positional Porameters 
Initialization” 
or (when processing 1. Obtains next PCE 2 Scans Buffer for 3 Checks Q Builds 5 Checks 
Parameter positional _ Parometer Syntax PDE Validity Parameter 
Control List parameters within y and Descriptive 
(PCL) a subfield) from IK JIDENT or es List (PDL) 
Operation IK POSIT Eecores 
Diagram 19 . tied 
IKJIDENT PCE | “Scanning for tee IK JIDENT PDE 
be Keywords and Repeat Se 
IK JPOSIT PCE | Subfields”. Step | Ik JPOSIT PDE 


| Repeat step — PUTLINE ond PUTGET 
To Operation Diagram 19 Brcwsi’ Rerun cen epiccak 
IK JTERM PCE "Scanning for Keywords P : al 


See Diagram 18 and Subfields" 
for a description 


of the PARS2 Parse Input Stack 7 Input Buffer 


PCEs, ae 
i - length positional parameters 


LIST and RANGE Ogtions 
LIST OPTION 


If the LIST option is specified, one word is added to the basic PDE, Ifa list ts entered from the terminal, this word is used to chain the elements of the list togethe: as shown Lelow, 
The chain word for the last PDE is set to X'FFOQO000". (If the list is not entered from the terminal, the chain word for the basic PDE will contain X'FFOOQ000'.) 


; Basic PDE Basic PDE 
ae X' FFOO0000 * "x" FFO00000" 


list entered from the terminal no list entered from the terminal 


IKJOPER PCE 
or 
IK JRSVWD PCE 


RANGE OPTION 
If the RANGE option is specified, two identical PDEs ore created, (If the range is not entered from the 


terminal, the second PDE contains zeroes,) 
Basic PDE Basic PDE 


Basic PDE 


range entered from the terminal no range entered from the terminal 


COMBINING THE LIST AND RANGE OPTIONS 


If both the LIST and RANGE options are specified, two identical PDEs are created for each element in the list as shown below, 


Basic PDE Basic PDE 
Big PDE 


Basic PDE 
Basic PDE 
X 'FFOOOCOO ' 
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CROSS - REFERENCE TABLE 


Key Description 


1 = The IKJIDENT PCE describes a positional parameter in the form of a character string with optional 
instrictions on the First character, other characters, and length. 


The IK JPOSIT PCE describes a positional parameter which includes a delimiter as part of its syntax, 
There are 10 kinds of IK JPOSIT PCEs and each has its own processing routine, 
2 The buffer is scanned for the parameter. 
@  =|f the parameter is missing, the PCE is checked to see if it is required or if there is a default, 
- If the parameter is required, the terminal is prompted for the parameter. 
- If tnere is a default, the default is supplied. 


- If the porameter is not required, Parse gets the next PCE, 


3 silf the parameter is found (or defaulted ) the parameter is checked for correct syntax, 


e (If anerror is found, the user is prompted to reenter the parameter and step 2 is repeated, 


4 si! f the parameter is correct, a PDE is built and the parameter is translated to upper case, 
If o list is being processed, step 2 is repeated for each element in the list. 


5s {f the calling routine has specified a validity check exit, the validity check exit routine is entered, 
\f atange is being processed, the complete range is passed to the exit routine. Ifa list is being 
processed, each element in the list is passed to the exit routine, 


e !f an error is found, the terminal is prompted to reenter the parameter and step 2 is 
repeated, 


“ - ———— SSS IR IPOSIT PGES = 


be - IKJIDENT PCEs --- 


ee STRING 


Routine 


IK JEFPOI 


IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 


IK JEFP20_ 


le 


Routine 


TYPETEST 


GENSCAN 


1K JEFP20 


TRANSQ 


IK JEFPOO 


IK JEFPO2 
IK JEF PO2 


IK JPOSIT PCEs -—-— —--— 


4 


Routine 


‘DELIMITER | IKJEFPOO 


STRING 


SKIPB PROMPTQ 


TYPETEST 


IK JEFPO2 


IK JEFPO2 


VCERTN ~ 


DSNAME/DSTHING 


Routine 


IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 
IK JEFPO2 


IK JEFPO1 


Routine 


SKIPB 
LISTT 
SCANF 
TYPETEST 


PROMPTQ 
GETCORE 
WRITER2G 


Label 
DSNAME 


IK JEFPOO 


QSTRING 


IK JEFPOO 
IK JEF POO 
IK JEF POO 
IK JEFPOO 


IKJEFP20 | GENSCAN 


ADDRESS PSTRING USERID 
Routine Label Routine | Label {| Routine | Label Routine Label 
IK JEFPOO | VALUE IKJEFPO2 | ADDRESS | IKJEFPO2 | PSTRING | IKJEFPO2 | USERID 
IK JEFPO? | SKIPB IKJEFPO2 | SKIPB IKJEFPO2 | SKIPB IKJEFPO2 | SKIPB 
1k JEFPO? | LISTT IKJEFPO2 | LISTT IKJEFPO2 | PROMPTQ | IKJEFPO2 | LISTT 
Ir JEFPO? | TYPETEST | IKJEFPO2 | TYPETEST | IKJEFPO2 | GETCORE | IKJEFPO2 | TYPETEST 
IV JEFPO? | PROMPTQ | IKJEFPO2 | RANGE | IKJEFPO2 | WRITER} IKJEFPO2 | SCANF 
\K JEFPC2 | RANGE IKJEFPO2 | GETCORE 
IKJEFPO2 | PROMPTQ 
IK JEFPO2 | WRITE2G 
i oe. i | IKJEFP20 | GENSCAN 
Ik JEFP20 | TRANSQ | IKJEFPO2 | TRANSQ | IKJEFP20 | TRANSQ | IKJEFP20 | TRANSQ 
IKJEFPO? | VCERTN IKJEFPO2 | VCERTN | IKJEFPO2 | VCERTN IKJEFPO2 | VCERTN 


IK JEFP20 
IK JEFPO2 


TRANSG 


IK JEFP20 


SKIPB 
PROMPTQ 
GETCORE 
WRITERI 


VCERTN 


1K JEFPOO 


TRANSQ 
VCERTN 
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INPUT : PROCESSING RESULT 
Parameter Control List (PCL) PARS2 Service Routine IK JPARS? Porameter Descriptive List (PDL) 
From Operation 
Diagram 16 "Set 
Up and Initialization" 


Scan Buffer For Positional Parameters 


1 Obtains 2 Scans Buffer 3 Checks 4 builds 5 Checks 
next PCE for Parameter Syntax PDE Validity 


and 


Updates 
Buffer 
Offset 


IK JTERM 
IKJOPER or 


Step | 
IK JRSVWD 


IK JTERM PDE 


IKJTERM PCE 


IK JOPER PCE 


Repeat 
Step | IK JOPER PDE 


or 


IKJRSVWD PDE 


or 


IKJRSVWD PCE 


PUTLINE and PUTGET 


Prompt Terminal User for Input 


—_ length | offset | positional parameters 


To Operation 
Diagram 17 


Parse 
Input Stack 


LIST and RANGE Options 


LIST OPTION 


If the LIST option is specified, one word is added to the basic PDE, If a list is entered from the terminal, this 
word is used to chain the elements of the list together as shown below. The chain words for the last PDE is set 
to X'FFOOO0000', (If the list is not entered from the terminal, the chain word for the basic PDE will contain 


X'FFOOO000',) 
Note 1: The IKJRSVWD macro instruction can also be chained to the 


IK JTERM macro and the IK JOPER macro to define the beginning 
of a list of reserved words, 


list entered from the terminal no list entered from the terminal {KITERM 


RANGE OPTION 
If the RANGE option is specified, two identical PDEs are created, (If the range is not entered from the 
terminal, the second PDE contains zeroes, ) 


IK JRSVWD 

IK JNAME The IKJNAME macros are used to list 
IK JINAME the possible Figurative Constants that 
IK JNAME can be entered for the IK JTERM macro 
1K JNAME by the terminal user. 


IK JNAME | 


range entered from the terminal no range entered from the terminal 


COMBINING THE LIST AND RANGE OPTIONS 
If both the LIST ond RANGE options are specitied, two identical PDEs ore created for each element in the 
list as shown below, 


IK JOPER 
ae 


——_—_ 


IK JRSVWD 


IK INAME ; 
IK JINAME The IK JINAME macros are used to list 


IK JNAME the possible Operators in an Expression 


that can be entered by the terminal user. 
| IK JNAME | 
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CROSS-REFERENCE TABLE 


Key Description 


The IKJTERM PCE describes a positional parameter that may be entered 
as a Constant, Variable or Statement Number, 


The IK JOPER PCE describes a positional parameter that may be entered 
as an EXPRESSION, 


The IKJRSVWD PCE describes a positional parameter that may be 
entered as a Reserved Word, (Also see note 1). 


2 The buffer is scanned for the parameter, 


e lf the parameter is missing, the PCE is checked to see if it is 
required or if there is a default, 
- If the parameter is required, the terminal is prompted for the 
parameter, 


- If there is a default, the default is supplied, 


- If the parameter is not required, Parse gets the next PCE, 


If the parameter is found (or defaulted) the parameter is checked for 
correct syntax, 


e {fanerror is found, the user is prompted to reenter the parameter 
and step 2 is repeated, 


If the parameter is correct, a PDE is built and the parameter is translated 
to upper case, Ifa list is being processed, step 2 is repeated for each 
element in the list, 


If the calling routine has specified a validity check exit, the validity check 
exit routine is entered, If a range is being processed, the complete range 

is passed to the exit routine, Ifa list is being processed, each element in 
the list is passed to the exit routine, 


@ If an error is found, the terminal is prompted to reenter the 
parameter and step 2 is repeated, 


Searching for IKJPARS2 


CLEANUP 


GENSCAN 


GETCORE 
LISTT 


NAMESKP3 


NEXTPCE 
PARS2ENT 


POSITX 
PROMPT@ 
PSTRIMSG 
PUSHI 
QSTRING 
RANGE 
SCANF 
SKIPB 
STALOC 
SYSRI 
TRANSQ@ 
TYPETEST 


CROSS-REFERENCE TABLE 


IKJPARS Routines Used by IK JPARS2 Flowchart 


- Free core, delete modules, exit 

- Parameter scan routine 

- Obtain storage (release before exit) 

- Test for LIST entered 

- Skip to next PCE routine 

- Go to next PCE routine 

- Entry into IK JPARS from IKJPARS2 when subroutine 
functions are required 

- Add PDE to PDL routine 

- Prompt with 'ENTER,,.' routine 

- Ending parenthesis assumed message 

- Push the stack routine 

- Quoted string routine 

- Test for a RANGE entered 

- Pop the stack routine 

- Skip blanks routine 

- Allocate storage in Subpool | 

- Write 'INVALID' message, then prompt 

- Translate to uppercase routine 

- Test for character type routine 
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Parse 
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Note: See Figure 19 for a 
description of Input Stack, 


PROCESSING 
IK JPARS 


Parse Service Routine 


Scans For Keywords and Subfields 


Locate Next PCE, 2 Scan Buffer for 
Paramete. and 


Compare to IK JNAME 


3 Build IKJKEYWD PDE } 
and Check for 
Subfield, 


If IK JINAME or 
IK JSUBF PCE, 
repeat Step |. 


PUTLINE and PUTGET 


Prompt terminal 
for Input, 


If IKJENDP PCE, 
go to Step 5. 


Build Subfield 
PDEs, 


If end of Jist: 


Build Default 
IKJKEYWD PDEs, 


Hength | offset | keyword parameters 


Return to Caller, 


RETURN 
NSS 
To TSO Command 


Processor 


MAgthere! cf Aoed von Divaqe Mire 19, Searching for Keyword Parameters und Subfields 


Method of Operation Diagram 19. 
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RESULT 
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CROSS REFERENCE TABLE 


The IKJKEYWD PCE marks the beginning of a keyword field and specifies options for 
that field, 


The buffer is scanned for a keyword and the result is compared to the names specified 
by the IKJNAME PCEs, 


If a match is found, the IKJKEYWD PDE is built and the IKJNAME PCE is checked 
for a subfield. 


If no match is found, the terminal is prompted to reenter the parameter. 
If more than one match is found, all previous PDEs built for the keyword are 


erased, and the terminal is prompted to reenter the parameter, See " Erasing 
PDEs" in Section 1, 


If the keyword name has a subfield, Parse interrupts the scan for the keyword field and 


processes the subfield in exactly the same way that it would process a field, When an 


IK JSUBF or IKJENDP PCE is reached, Parse resumes the scan for the keyword field, 
When all of the keyword fields have been scanned, Parse checks each IKJKEYWD PCE 
to see if the corresponding PDE has been built. 
e =f not, a default value is supplied. 
(Keyword parameters are never required.) 
When an IKJENDP PCE is reached, Parse checks to see if the scan is complete. 


e = If the scan has reached the end of the buffer, Parse returns control to the 
calling routine, 


If the scan has not reached the end of the buffer, Parse writes an "extraneous 
data" message, or an "invalid keyword " message if there are keyword PCEs 
in the PCL, and returns control to the calling routine. 


1K JEFPOO 


IK JEFPO2 


1K JEFPO2 


IK JEFPO2 
1K JEFPOO 


IK JEFPO2 


1K JEFPO2 
1K JEFPOO 
IK JEFPOO 


1K JEFPOO 


1K JEFPO2 


IK JEFPOO 


IK JEFPOO 


IK JEFPOO 


KEYWDP 


KEYWD 
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PROMPTQ 
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PROMPTQ 


KEYWDSUB 
ENDFIELD 
KEYWDP 


KEYWDP 


PROMPTQ 


ENDFIELD 


ENDX1 
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Section 3: Program Organization 


This section describes the organization of command scan and parse. It 
contains information about the hierarchy of the load modules, the 
assembly modules, and the control sections that constitute each program. 
Figure 20 is a graphic representation of this hierarchy. 


The module operation information briefly describes the processing 
Operations that occur within each parse and command scan module. 


For a summary of the functions performed by each subroutine (routines 
below the control section level) refer to the Directory in Section 4. 


Program Hierarchy 


Command scan has two assembly modules while parse has three assembly 
modules as shown in Figure 20. One assembly module (IKJEFP20) is common 
to both parse and command scan so that the two programs, when combined, 
have only four assembly modules. They are: 


IKJEFPOO -- Parse. This module has three control sections: IKJEFPOO, 
IKJEFP01, and IKJEFPO2. 

IKJEFP10 -- Parse messages 

IKJEFP20 -- Common subroutines 

IKJEFP30 ~- Command scan 


IKJPARS2 is an assembly module that is loaded by IKJPARS when an 

IKJTERM, IKJOPER or IKJRSVWD macro instruction is coded. 
IKJPARS2 includes three control sections; IKJEFP40, 
IKJEFP50 and IKJEFP60. 


Figure 21 shows the linkage relationship between IKJPARS and 
IKJPARS 2. 
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Command 
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| 
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Load Module Names 


IK JPARS 


Parse Service 
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IK JPARS2 


Parse2 Service 
Routine 


Routine 


IK JEFPOO 
Parse 
CSECT | 
IK JEFPO] 


Parse 
CSECT 2 


IK JEFPO2 


IK JEFP40 


1K JEFP50 


1K JEFP60 
Parse2 
CSECT 
IK JEFP1O 
Parse 
Messages 


IK JEFP20 


Common 
Subroutines 


Approximate Sizes 


IK JPARS SYS1, LINKLIB 12K bytes 
IK ISCAN SYS1,LINKLIB 1.5K bytes 
IK JPARS2 SYST. LINKLIB 8K bytes 


3 instruction is coded, 
es Bee, ee — el Ot Sie 
Figure 20. Program Hierarchy: 


Note: IK JPARS2 is loaded by IKJPARS when an IKJTERM, IKJOPER or IKJRSVV/D macro 


Command Scan and Parse Service Routines 
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In JPARS IK JEFPOO, IKJEFP20, IK JEFP30) IK JPARS2 (IKJEFP60, IKJEFP40, IK JEFP50) 


Q) Process PCEs (4) Process PCEs 


(2) 1K JPARS 


IKJTERM 
IKJOPER 
IK JPARAS IKIJIRSVWD 
IK IPCSIT 
IK JIDENT : . 
IKIKEYWIEC G) IK JPARS Subroutines required 
IK INAME 
IK JTERM G) Requires IK JPARS2 
eaten @ Load IK JPARS2 
(iF not loaded) LINKRET ROUTINE 
kK 
a e Call IKJPARS2 Load subroutine address 


IKIRLSA Save IKJPARS2 environment 
Save address of PCE processor 
Load entry to IKJPARS 
Establish IKJPARS environment 


Load address of processor 
Return to PCE processor 


Branch to proper 
| subroutine 


> _ 


Return to IK JPARS? 


Subroutines 
used by all the 
PCE Processors 


Figure 21. Linkage Between IKJPARS and IKJPARS2 


158 


OS/VS2 Terminal Monitor Program (VS2 kelease 1) 


Module Operation 


The following descriptions briefly describe the processing operations in 
each executable module of the parse and command scan service routines. 


IKJEFPOO -- PARSE SERVICE ROUTINE 
This module has three control sections: 

IKJEFPOO 

IKJEFPO1 

IKJEFPO2 
Scans buffer for command parameters, checks their syntax, optionally 
translates them to uppercase, Optionally checks their validity, builds a 
PDL consisting of PDEs that describe the parameter found, returns to 
calling program. 
IKJEFP20 -- COMMON MODULE (USED BY BOTH PARSE AND COMMAND SCAN) 
Consists of the following routines: 

GETSCAN is a generalized scan routine that checks the syntax of the 

command buffer parameter according to control information set up by the 


invoker of command scan or parse. 


TRANSQ is a translate routine that translates lowercase alphabetic 
Characters to uppercase. 


TRANSX - Translates lowercase alphabetic characters to uppercase, if 
the parameter is known not to be defaulted. 


IKJEFP30 -- COMMAND SCAN SERVICE ROUTINE 
Searches the buffer for a valid command name, optionally checks the 
syntax of the command name, translates the command name to uppercase, 


indicates whether parameters follow the command name, updates buffer 
offset, returns to calling program. 


IKJEF P60 -- IKJPARS2 SERVICE ROUTINE 
1. Entry point IKJEFP40 provides syntax checking for Reserved Word 


parameters specified on the IKJRSVWD macro instruction. 


2. Entry point IKJEFP50 provides syntax checking for Expression 
parameters, specified on the IKJOPER macro instruction. 


3. Entry point IKJ&FP60 provides syntax checking for Constant, 
Variable or Statement Number parameters specified on the IKJTERM 
macro instruction. 
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Section 4: Directory 


This table contains information to help you find the appropriate module operation 
description or assembly listing. It correlates information from three sources: 


e The source code. 
e The executable load modules. 
e This manual. 


aa sa Tee ee a ee ee a ee a ee ee Ye a 1 
| [ "| Load Assembly | Control | | | 
| | |Module |Module |Section | | | 
| Label |Common Name|Name | Name | Name | Description | Diagram | 
--=-=--- ~----------}--------}--------}--------}---------------------------$+----------4 
| ADDRESS |Positional |IKJPARS | IKJEFPOO|IKJEFP0O1|Scans buffer for address - | 17 | 
| | Address ; { | | Prompts for missing data. | | 
| | | | | | Identifies address type. | 
| { | ; | |Builds temporary PDE. | | 
| | { | { {Checks for possible list. | | 
| | | | ] | Branches to ILLADR if | | 
| [ [ | t {illegal address. Otherwise| | 
i { { | | Jreturns to NEXTPCE. | | 
| | | | | | | | 
| BUMP | Bump the | IKJPARS2|---- | IKJEFP60|Test for more data. Take | 18 | 
| | Input { | { joff the last element put | | 
| | Stack | | [ Jon the push-down stack, and| | 
| [ | | | {continue processing, if | | 
| | | | | jmore data. Return +0 on no| | 
i | | | [ [more data, +4 on more data. | | 
| | | | | | | 
|CLEANUP |Cleanup J IKJPARS | IKJEFP00|IKJEFP02|Frees all storage obtained | 16,17 | 
{ | | l [by parse when terminal | 18 | 
| ; { ; | {error occurs. Places | | 
| [ | | | |X*°FFOO0000° in answer | | 
| | | | ] | place. | | 
[ | | | | | | 
| DELIMITR| Positional JIKJPARS | IKJEFPOO|IKJEFPOO|Scans buffer for next | 17 | 
| [Delimiter | { | |self-defining delimiter and| | 
| i | i i {sets switch if invalid. | | 
| | | | | | | | 
JOSNAME |Positional |IKJPARS |IKJEFPOO|IKJEFP01|Scans buffer for DSNAME or | 17 | 
| | Data | | | |DSTHING. Builds temporary | | 
] |Set Name | f | | PDE. | | 
| | | | | | | 
| ENDF IELD| End-of- J IKJPARS | IKJEFPO0O|IKJEFPOO|Entered at end of field -- | 19 | 
| {Field | | [ [Checks for extraneous data | | 
| |Processing | | | Jin buffer of subfield and | | 
| | Routine | | | [writes error message. | | 
| | | | | |Entered when erasing PDEs | | 
| | | | [ |-- Releases current RWORK | | 
| | { | | jand gets next RWORK. | | 
| | | | | | Entered at end of subfields| | 
| | | | { |-- all functions executed | | 
| | | | | |for other entries. | | 
| | | | | | | | 
| EXIT | Pinal | IKJPARS | IKJEFPOO|IKJEFP00|Deletes PUTLINE and PUTGET.| 19 | 
| exit { | ] | Frees PWORK and RWORK. | | 
| | | | | {Updates buffer offset to | | 
| | | | | Jpoint one character past | | 
| | | | } Jthe last character scanned. | | 
eee eee are Be See ee SS 4 Wan Rea ak aI pee re ee YT ear he te a sete AS nT EN IN ena Mh catia on ee Spee J 
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Car =e ee Lo eS oe i a ee ee lies ap are oat eae Toone en eee ee oe eee {oe ee 1 
| | | Load {|Assembly|Control | | | 
: | Command |Module |Module |Section | | | 
| Label |Name | Name | Name | Name | Description {| Diagram |] 
~------}~-----------}--------}--------}-----~---}--------------------------- ¢-----------4 

| FREECORE|Issue | IKJPARS2 | ---- { IKJEFP4O| Issues freemain to release | 18 ! 
| | Freemain { | | jstorage. Returns to | { 
| | | | | caller. | | 
| | | | | 
|GENSCAN |General | IKJPARS | IKJEFP20|IKJEFP20|Scans buffer for character | 14,15 | 
| | Scan { and | | {| string. | | 
| | |IKISCAN | | | | | 
| | | | | | | | 
|SETCORE |Get Core | IKJPARS | IKJEFP00|IKJEFPO2|Gets more storage. {| 17,19 | 
| | | | | | | | 
| IGENT | | IKJPARS | IKJEFPO00O|IKJEFPO1|Scans for buffer positional| 17 | 
| | ; | | | parameter. ; 
| IKJEFP40; IKJIRSVWD | IKJPARS2| --- | IKJEFP40] Processes the Reserved | 18 | 
| | Processing | | { |Word parameters. | | 
| | | | | | | | 
| T_KJEFP50|IKJOPER | IKJPARS2 | --- | IKJEFP50| Processes the expression {| 18 | 
| | Processing | | | | parameter. | | 
| | | | | | | 
| IKJEFP60| IKJTERM | IKJPARS2|--- | IKJEFP60|Processes a constant, |} 18 | 
| |Processing | | | | Variable, or statement | | 
| | | | | J|mumper parameter. | | 
| | | | | | | | 
| IKJPARS |Parse {| IKJPARS | IKJEFPOO|IKJEFPO0O|Gets main storage fcr PWORK| 16 | 
| | Service | | | |and RWORK. Loads PUTLINE | | 
| | Routine | | | [and PUTGET. | | 
| | | | | | [ 
| IKJPARS2| Pars e2 | IKJPARS 2| --- | IKJEFP50| Processes an IKJTERM, | 18 | 
[ | Service | | | | IKJOPER, Or IKJRSVWD macro | | 
| | Routine | j | | Instruction when loaded by | | 
ts | l l | [KJPARS. l 
| | | | 
| IKJSCAN | Command | IKJSCAN | IKJEFP30|IKJEFP30|Scans buffer for command {| 14 [ 
| |Scan | [ | | name. | | 
; | | | | | | 
| KEYWD | Keyword | IKJPARS | IKJEFP00|IKJEFPO2|Scans buffer for keywords | 19 | 
| | Scan | | | Jand subfields. | [ 
| | | | | | | | 
|KEYWDP [Keyword | IKJPARS | IKJEFPOO|IKJEFPOO|Entered before keyword {| 19 | 
| |Processor | | | | field is scanned--Sets | | 
| | | | | [switch to indicate keyword | | 
| | | | | {scan and gives control to | | 
| [ | | | | keyword scan routine. | | 
| | [ | | | Entered after keyword field| | 
| | | | | [is scanned--Checks to see | | 
| [ | | | {if PDE was built. It not, | ] 
| { | | | |jgets default and gives | | 
| | | | { | control to keyword scan. | | 
| | | | | [If so, gives control to | | 
| | [ | | [Main Control. Entered when| | 
| | | | | [erasing PDEs--Zeros the [ | 
| | | | | | keyword PDE, calculates the| | 
| | { | | [next PCE address. i | 
| | | | | | | | 
| LISTT | List | IKJPARS | IKJEFPOO|IKJEFPO2|Checks for a list and if { 17 | 
| | | | | Jone was entered. Gets | | 
| | | | | jaddress of first element. | | 
bee ae Se Hon eae ht 5 a ae eee eee Eee eee ee Gaeta eee ee 5 a lee ea cae eee fr eee a ee J 
(Continued) 
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CS le re eae {= 2 cei cee Beer gee an ee ee eer T 
| { | Load {|Assembly|Control | | 
| Command [Module |Module |Section | | 
| Label |Name | Name | Name | Name | Description | 
|-------- +----------- $-------- +-------- 4-------- }--------------------------- + 
|MSNSMSG |Missing [| IKJPARS | IKJEFP00|IKJEFPO2|Issues "MISSING" message | 
; |Message | | | Jwhen an “ENTER™ or “ENTER | 
| | ; | | | PASSWORD" prompt message | 
| | [ | | jwas attempted during ; 
; | | \ | |no-prompt mode. If HELP | 
; i | | | |messages were associated | 
[ | | | H jwith the prompt, "MISSING" | 
| | | | | [replaces "ENTER" on the ; 
| | | | ; | HELP messages. | 
| | | | | | 
| NAMES KP annie Skip |IKJPARS | IKJEFP00|IKJEFPOO| Entered after keyword field| 
| | | | | |scan--Skips IKJNAME PCEs._ | 
| | { [ H |When erasing IKJKEYWD | 
| | | i i | PDEs--Checks IKJNAME PCE | 
| | | | { |for subfield. If found, | 
i ( | | | [returns to RECURSE. If not| 
| | H | | | found, returns to NEXTPCE. | 
| | | | | | 
| NEXTPCE ioe | IKJPARS | IKJEFPOO|IKJEFP00|Locates the next PCE and | 
| | Locating | | | | branches to the appropriate | 
| | Routine { [ | {PCE processing routine. | 
{ | | 
rBOe ee iweseiona eouaee Tesmeboo eaere0n 1eisee control to | 
i {Processor | | | | appropriate 2nd level | 
; | ; | | | positional parameter | 
ee ee ee Oe OO cass | 
| POSITERS | Positional |IKJPARS | IKJEFP00|IKJEFP01|Erases a PDE for a [ 
( | PDE { | | {positional parameter. | 
l |Erase | | | ] | 
| | | | ; l 
|POSITX |Positional |IKJPARS |IKJEFP00| IKJEFP01|Checks for and processes a | 
| | Exat ; i i Jxrange. Checks for and | 
| | [ | [ | processes a list. { 
| } | | | | Translates to uppercase if | 
i { | | l [string, pstring, gstring, | 
{ | | | j |value, or ident. | 
[ | i | ; | 
|PROMPTQ | Prompt | IKJPARS | IKJEFPOO|IKJEFPO2|If prompt was specified-- | 
| | Default | | |Prompts terminal. Saves | 
| | | | | jaddress of command buffer. | 
| [ { | | |Saves message ID. If | 
| | | | | |default was specified-- | 
; | [ | | {Supplies default value. ; 
| | | 
| PSTRIMSG | Parenthesis| IKJPARS eerie tie a right parenthesis 
{ | Assumed | | | jis not found, writes a | 
{ | Message | | | j|message indicating it is | 
ee A ee Se cars : 
[PSTRING. |Positional |IKJPARS | IKJEFPOO|IKJEFP01|Scans buffer for | 
| |Parenthe- | | | |parenthesized string-checks | 
| |sized | | | jfor embedded parentheses. _ | 
a | 
| PUSHI |Push Input |IKJPARS | IKJEFP00|IKJEFP0O2|Saves current buffer | 
| | Stack | | | {pointer and end-of-buffer | 
[ | | [ | jpointer on input stack. | 
| | | | | |Gets more storage when | 
| | | | | {stack is full. | 
Beeiee e SS een ea ie ct een deeueJeJ. pe eae ee ea a 1 
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19 


16 


17 


17 


17 


19 


18 


17 


17,19 


a em es eres ce ey ry ee ee Oe ee eee ee eee OS ee ew ee ee oa ee ee 


(Continued) 


a aaa a aa aaa To -...- = Po ee ee er ee To 1 
| | | Load |Assembly|Control | | | 
| | Command |Module |Module |Section | | | 
| Label |Name | Name | Name | Name | Description | Diagram | 
~-----~-}-----------}--------}--------}-------- }--------------------------- +----------- : 
|OSTRING |Positional |IKJPARS | IKJEFPOO|IKJEFP01|Scans buffer to next TAB or| 17 H 
| | Quoted { | | |mon-separator character. | | 
| co | | | | | 
| RANGE | Range J IKJPARS | IKJEFPOO|IKJEFO2 |Checks to see if a range is| 17 | 
| | | | | ‘ae | | 
|RECURSE |Subfield | IKJPARS | IKJEFP00|IKJEFP00|Gets main storage for {| 16 [ 
| |Processing | | | | RWORK. | | 
| soe | | | r | 
| SCANF | Pop the | IKJPARS |IKJEFP00|IKJEFP00|Checks for end of stack. i 18 | 
| | Stack | | | [Removes last element put on| | 
i { [ | ; jthe push-down stack. | | 
| | | | | [Issues freemain for | | 
| | { | | |previous stack. Returns to| | 
| | | [ | |caller. | | 
| | | | | | | | 
|SCANPOP |Pop Input |IKJPARS | IKJEFPOO|IKJEFPO2|Gets last element from | 17,19 [ 
{ | Stack | | | {input stack. | | 
| [ | [ [ l | | 
|SKIPB |Skip {| IKJPARS |IKJEFP00|IKJEFP02|Updates buffer offset to } 19 i 
| [Separators | | | |first non-separator | | 
eR ee See OR ecisscns ro 
|STALOC |Storage | IKJPARS | IKJEFP00| IKJEFP0O2|Allocates main storage for | 16 - | 
| {Allocation | | | {PDL and prompt data from | | 
| | { | | |storage obtained by | [ 
| | | | | | GETCORE. [ | 
| [ | | | | se te ie ces 
[STRING |Positional |IKJPARS | IKJEFP00|IKJEFP00|Prompts for data if switch | 17 | 
| [String | i | jis set by delimiter j | 
| | | { | jroutine. Scans buffer for | | 
| | | f | | character string. | [ 
| | | | | | . | | 
|SYSR1  |Error {| IKJPARS | IKJEFP00| IKJEFP02|Calculates length of {| 19 
| | Handling | { | Jinvalid data. Builds | | 
| H { | | | informational message [ | 
| | | | | | segments. | l 
| | | | | | [ | 
| TERMOCK | Check | IKJPARS 2| --- J IKJEFP40|Checks and test the | 18 ; 
i | TERM PCE | [ | | IKJTERM PCE. | | 
| | | | | | | 
{TRANSQ |Translate |IKJPARS |IKJEFP20|IKJEF20 |Translates lowercase | 14,15 | 
| | | and | i [Alphabetic characters to | | 
| | {| IKJSCAN | | | uppercase. | | 
| | | | | | | | 
[TYPETEST|Character |IKJPARS | IKJEFPOO|IKJEFP0O2|Tests current character | 17,19 | 
| |Type Test | | | jagainst selected mask. | | 
| | | | | | | | 
{USERID |Positional |IKJPARS |IKJEFP00|IKJEFP01|Scans buffer for |} 17 | 
| | Userid | | | | userid/password. | | 
l | | | l | | 
| VALUE |Positional |IKJPARS | IKJEFP00|IKJEFP00|Check type character. { 17 | 
| 4 | | | | | 
| 
| VCERTN | Validity | IKJPARS | IKJEFP0O0O|IKJEFPO2|Sets up linkage to | 17,19 | 
| | Check [ [ ; Juser-supplied validity | | 
| [Exit | | | jcheck exit routine. | | 
teehee Genie Sent omen aS fee ane US ah ee ee Hare eee ae ey Sess Sra Wt, cere eR Ree For cnt ME ey On [ee ee ee 
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he eS ee a a 5 Ca eee ome 2 ean ae were Da a ye gi ee een re pO 1 
| | | Load |Assembly|Control | | | 
| | Command {Module |Module |Section | | | J 
{| Label |Name |] Name | Name | Name | Description |] Diagram | 
anes rn ns i 
|WRITER1 | Informa- | IKJPARS | [IKJEFPOO|IKJEFPO2|Writes informational | 17,19 | 
[ [tional | | | | messages. | | 
| Jmessages | | | | | | 
| | | | | | | 
|WRITER2 | Prompt | IKJPARS | [KJEFPOO|IKJEFP0O2|Prompts terminal for input | | 
i | Messages i | | Jif necessary or checks for | | 
| ; | | { |default. Takes any new | | 
[ | { | | |data and places it in | | 
| | ; | | |storage allocated by | | 
| | | | | | STALOC. | 
ne ee 0 ee eee ee fGen ene ea Cpe eee en eave eer Oo Sh te sl pe ane Ore 4 
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Section 5: Data Areas 


This section describes the major data areas used by command scan and 
parse: 


Command scan parameter list (CSPL) 

Command scan output area (CSOA) 

Parameter control entry for IKJENDP macro instruction 

Parameter control entry for IKJIDENT macro instruction 

Parameter control entry for IKJKEYWD macro instruction 

Parameter control entry for IKJNAME macro instruction 

Parameter control entry for IKJPARM macro instruction 

Parameter control entry for IKJPOSIT macro instruction (All except 
String, pstring, and qstring) 

Parameter control entry for IKJPOSIT macro instruction (string, 
pstring, qstring) 

Parameter control entry for IKJTERM macro instruction 

Parameter control entry for IKJOPER macro instruction 

Parameter control entry for IKJRSVWD macro instruction 

Parameter control entry for IKJSUBF Macro Instruction 

Parameter descriptor entry for IKJIDENT macro instruction 
Parameter descriptor entry for IKJKEYWD macro instruction 
Parameter descriptor entry for IKJPARM macro instruction 

Parameter descriptor entry for IKJPOSIT macro instruction (address) 
Parameter descriptor entry for IKJPOSIT macro instruction (dsname, 
dsthing) 

Parameter descriptor entry for IKJPOSIT macro instruction 
(Expression/value) 

Parameter descriptor entry for IKJPOSIT macro instruction (userid) 
Parameter descriptor entry for IKJPOSIT macro instruction (value) 
Parameter descriptor entry for IKJTERM macro instruction (Constant) 
Parameter descriptor entry for IKJTERM macro instruction (Variable) 
Parameter descriptor entry for IKJTERM macro instruction (Variable, 
data name qualifier) 

Parameter descriptor entry for IKJTERM macro instruction (Statement 
Number ) 

Parameter descriptor entry for IKJRSVWD macro (Reserved word) 
Parameter descriptor entry for IKJOPER macro (expression) 

Parse parameter list (PPL) 

Parse permanent workspace (PWORK) 

Parse recursive workspace (RWORK) 

Syntax checking mask area 

Validity check parameter list (VCEPARM) 


The following information is included for each data area: 


Size, in bytes. 

Name(s) of the routine(s) that creates it. 

Name(s) of the routine(s) that update and/or reference it. 
Field names, displacements, size, and contents. 
Cross-references to method of operation diagrams. 
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COMMAND SCAN PARAMETER LIST (CSPL) 


Size: 24 bytes. 


Constructed by: Terminal monitor program or any command 
processor using command scan. 


Located in: Subpool 78. 
Updated by: None. 
Used by: Command scan. 
Contents: Parameter list. 
faa 
| Operation | 
|Diagrams | 
a 
{| 14 | 
ees EAE mC aE : ea : a Sf aS eS ee eae apie ciel { 
| Displacement | Field |Size in| | 
| Dec. Hex. | Name [Bytes | Contents { 
~-----------}---------- +——-----4--------------------------------------+ 
ee 0 | CSPLUPT | 4 jt User profile table (UPT). { 
| i | | 
{4 4 | CSPLECT | 4 |¢ Environment control table (ECT). | 
[ | | l | 
|8 8 | CSPLECB | 4 |t Event control block (ECB). | 
| [ | | 
{12 Cc | CSPLFLG } 4 [* Flag word set as follows: | 
l i | | 
| | [ [x°00° - syntax check command name. | 
| | 
| | | {x°80° - do not syntax check command | 
| [ | | name. | 
i | | 
{16 10 |CSPLOA { 4 {* Command scan output area (CSOA). | 
|. [ | { (set by IKJEFP30) | 
{ i | i | 
| 20 14 |CSPLCBUF | 4 |* Command buffer (CBUF). 
a ee ed J 
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COMMAND SCAN OUTPUT AREA (CSOA) 


Size: 8 bytes. 

Constructed by: Calling routine 

Located in: Subpool 1. 

Updated by: Command scan. 

Used by: Terminal monitor program or command processors 


using command scan. 


Contents: Indicates the results of a scan for command 
name. 
one ed 
| Operation| 
[Diagrams | 
| 14 | 
(SS =-ar SSS = oa ae 1 oes SS a aS f=sS 2S 2s > 1 
| Displacement| Field [Size in| ( | 
| Dec. Hex. | Name {Bytes | Contents 
|------------ +---------- +------- }-------------------------------------- { 
{0 0 | CS OACNM | 4 |*# command name (zero if invalid). [ 
| | | | 
|4 4 | CSOALNM | 2 | Length of command name. | 
| | | \ 
| 6 6 | CS OAFLG { 121 [Flags set as follows: | 
| | | | | 
{ | CSOAVWP [ |X*°80° - valid with parameters. | 
| | | | 
| | CSOAVNP [ [X*40° - valid, no parameters. | 
| | | | | 
[ | CS OAOM | |x°20° - questionmark. [ 
| | | | 
| | CS OANOC | |x°10* - no command name. | 
| | | | 
| | CSOABAD | |x°O08* - invalid command name | 
| | | | 
{7 7 [===> | 1 | Reserved (0). | 
L 


! 
{ 
I 
l 
t 
l 
| 
{ 
| 
| 
| 
] 
FE 
I 
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[ 
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] 
! 
| 
I 
| 
! 
[ 
! 
| 
( 
| 
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[ 
{ 
1 
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COMMAND SCAN WORKSPACE (CSWORK) 
Size: 91 bytes. 
Constructed by: Command scan. 
Located in: Subpool 0. 
Updated by: Command scan. 
Used by: Command scan. 
Contents: Register save area, internal storage. 
Poe eo 
| Operation | 
|Diagranrs | 
———— 
| 14 | 
ee eae 1 aaa Te a ee eae a a { 
Displacement }Field [Size in| | 
{Dec. Hex. | Name jBytes | Contents I 
——-—--------}--—-----—— $}---—---}---------~------—----—---—------- 
[| 0 0 | CSWORK | 72 [18-word register save area. | 
| | 
[72 48 | PDWORD j 8 |Scratch/save/convert area. ; 
| i | | 
| 80 50 |ENDINPUT | 4&4 |Last input character address used to | 
| | | | determine end of data. | 
| | { | 
{84 54 |PPOINTER | 4&4 [Address of first character scanned. | 
| | | 
{90 5A {|RETCODE { 1 {Return code. ( 
ee ee eee ee 4-4 be +--+] 


{Note: The DSECT for CSWORK is generated by the IKJEFPWA macro 


jinstruction, which also generates the DSECT for PWORK (Parse permanent | 


jwork area). 
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PARAMETER CONTROL ENTRY FOR IKJENDP MACRO INSTRUCTION 


Size: 1 Byte. 

Located in: Subpool 1. 

Created by: Command processor using IKJENDP macro 

instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE ends the PCL. 
ase alae 
| Operation| 
|Diagrams | 
| 19 | 

Rae —j—--- > ae a a a a= SS=—= 1 

| Displacement| Field [Size in| | 

| Dec. Hex. | Name |Bytes | Contents | 

|------------ }---------- }-------} --- 5 == nn nnn { 

1 0 1 Flags: 
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PARAMETER CONTROL ENTRY FOR IKJIDENT MACRO INSTRUCTION 


Size: Variable. 

Located in: Subpool 1. 

Created by: Command processor uSing IKJIDENT macro 
instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE describes a positional parameter in 


the form of a character string with optional 
restrictions on the beginning character, 
additional characters, and length. 


| Operation| 
| Diagrams | 


| 17 | 
fp ee te a Mee a ree ie eee Ae S a4 
| Displacement | Field [Size in| | 
| Dec. Hex . | Name |Bytes | Contents | 


2 ap Sp eee ee ee es ee es a ee ee a SE GE i ce SP ee ee 


0 0 


= 
ct 


Meaning when on 
B°100° -- IKJPOSIT PCE 


PROMPT 
DEFAULT 
Reserved (0) 
HELP 
VALIDCK 
LIST 
ASIS 
RANGE 

-15 Reserved (0) 


PE OOIAN EWS 
nN 


= © 


b 


ngth of PCE. 


—& WN 
Le) 


O 


ffset in PDL at which PDE is found. 


On 
On 


IDENT options specified. 


ow 
~ 
ct 
® 
ey) 
Ee. 
< 
> 
r= 
e) 
» 


PTBYPS 
-7 Reserved (0) 


i 


~~] 
~] 


irst Character. 


@ 
rad 


Jumber Meanin 

Any character accepted. 
Alpha required. 

Numeric required. 
Alphameric required. 
Not used. 


(Continued) 


FWNPrF Of] rej 


! 
re 
re 


PP a ee ee ee ce a oe ee ee ee ee ee a ee ee ee ee ee ee ee ee ee ee ee 6 ee ee Oe 
x7 
eS —— ee es ee ee ee ee ee 8 
fe ce ee es ae ee ee ee — a ae ee oe 
-_ NO 
rm ce a ce cn cee ee es ee ee ee ee es 8 


ee ee ee ee ee ee ee ee > ee ee ee ee ee ee — oe ee ee oe 
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cr 


en ee | aera ems RR A a a a a a aa a a 1 
| Displacement|Field {Size in| [ 
|Dec. Hex. |Name {Bytes | Contents | 
1 | Other Characters. 
| 
| Hex 
|Number Meaning 
| Any character accepted. 


f t 

| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | {1 Alpha required. | 
| | | [2 Numeric required. { 
| | | |3 Alphameric required. | 
| | | |4-FF Not used. | 
| | | | , { 
[9 9 | | 2 | Length of parameter type including { 
| | i [this and following field. | 
| | l | | 
[11 B [ | 2 [x°0012" -- message segment offset. [ 
| | | | | 
[== == || | Ne | Parameter type. i 
| | | i 
== ae | | 1** |Maximum length (MAXLNTH) . | 
| | | | | 
[== con | | 1** |Length -1 of default or prompt | 
| | | | information. | 
| | | | | 
[aS a= | | N*# | Default or prompt information. | 
| | | | | 
[-- ae | 2*# |Length of total help data. Including | 
| | | |this field and the following field. 
| | | | 
== == | | 1*#*# |Number of HELP messages. | 
| | | | | 
pa= == | | 2** |Length of help information. Including| 
| | | jthis and the following two fields.++# | 
| | | | 
in a | | 2** |x*'000" message segment offset. *+#* | 
| | | | | 
== == |i { 3** |Address of validity checking routine. | 
|-- -- | | N* |HELP information. ** | 
| | | | | 
| | [ | *Optional field of length "N" bytes. | 
; | [ | **Optional field. | 
| | l |***These three fields are reproduced | 
| | { | for each level of help information. | 
eee eneneeee eee estreee 7 ae eeseR ee ae | Cesare YEAR ene Sere era yeaa ee et eaten ene Pee es 4 
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PARAMETER CONTROL ENTRY FOR IKJKEYWD MACRO INSTRUCTION ) 


Size: Variable. 

Located in: Subpool 1. 

Created by: Command processor using IKJEKYWD macro 
instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE begins a description of a keyword 


field. The eligible names for this keyword 
field are in the PCE's generated by subsequent 
IKJNAME macros. This PCE specifies the options 
for the keyword field. 


| *Optional Field. 
Lisi sees field of “N®" length bytes. 


|Operation| 
|Diagrams | 
t--------- { 
| 19 | 
—-------- -- ,- - + + + py + +--+ +--+ + ot CRA a eT ee 4 
| Displacement | Field jSize in| { 
| Dec. Hex. | Name [Bytes | Contents | 
== Sac an ar er aa .——- = { 
{oO 0 | | 2 | Flags: | 
| | | | . ] 
[ | | | Bits Meaning when on | 
| | [ | 0-2 B‘010' -- IKJKEYWD PCE | 
{ j | [3 Reserved (0) | 
| { | |4 DEFAULT | 
| [ | [5-15 Reserved (0) | 
{ | l | | 
j2. 2 | { 2 {Length of PCE. [ 
| | | | | 
{4 4 | | 2 |Offset in PDL at which PDE is found. | 
| | | | | 
\6 6 | | 1* {Length -1 of default information. | 
l | | | | 
| 7 7 { | N*#* |Default information | 
| | | | 
| | [ | 
| i | | 
L L L 
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PARAMETER CONTROL ENTRY FOR IKJNAME MACRO INSTRUCTION 


Size: Variable. 

Located in: Subpool 1. 

Created by: Command processor using IKJNAME macro 
instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE describes one of the eligible names 


for a keyword field and specifies the options 
associated with this name. 


cae eas 1 

| Operation| 

[Diagrams | 

j--------+ 

| 19 | 

[oe oe er Me as ee a ey er Oe Peer eros yt Saes=Saes= 1 
| Displacement | Field |Size in| { 
| Dec. Hex. | Name {Bytes | Contents l 
|------------ +---------- t-—----- {—----------—---------------- | 
[0 0 | {| 2 | Flags: | 
| | | | | 
| | [ [Bits Meaning when on | 
| | | | 0-2 B°0Q11° -- IKJNAME PCE i 
| | | [3-4 Reserved (0) |: 
| | | [5 SUBFLD [ 
| | | [6-10 Reserved (0) | 
| | | | 11 INSERT l 
[ | | J12-15 Reserved (0) | 
| | | 
| 2 2 | | 2 [Length of PCE. [ 
| | | | | 
|4 4 | i 1 [Length -1 of the name specified. | 
| | | | | 
|5 5 | ; Ne [Name of acceptable keyword. i 
| | | | | 
|-- -- | | 2**# [Offset in PCL to suofield PCE +1. | 
| | | | | 
== ==. | | 1** |Length -1 of keyword string to be | 
| | [ { inserted. [ 
| | | | . . l 
|-- -- | | N* |Keyword string to be inserted. | 
| | | | 
[ | | | *Optional field of “°N" length bytes. | 
| | | |*#Optional field. | 
eee en eanee een ee Mi ese Na a fee ere BD ca i a ee ee J 
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PARAMETER CONTROL ENTRY FOR IKJPARM MACRO INSTRUCTION 


Size: 6 bytes. 

Located in: Subpool 1. 

Created by: Command processor using IKJPARM macro 

instruction. 

Updated by: None. 

Used by: Parse 

Contents: This PCE is at the beginning of the PCL. 
TS 
| Operation| 
{Diagrams | 
| 16 | 

——----------------—--- 1------- y---------------------------- 4---------} 

| Displacement | Field {Size in| | 

| Dec. Hex. | Name |Bytes | Contents | 

|------------ $---------- +------- $-~---------——------------------------— { 

jo 0 [ [ 2 {Length of PCL. | 

l | i l | 

{2 2 [ | 2 {Length of PDL. [ 

| | l | | 

|4 4 | {| 2 [Offset in PCL to next IKJKEYWD, [ 

{ i | | IKJSUBF, or IKJENDP PCE. 

Oi a a a a a J 
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PARAMETER CONTROL ENTRY FOR IKJPOSIT MACRO INSTRUCTION (ALL EXCEPT 
STRING, PSTRING, AND QSTRING) 


Size: Variable. 

Located in: Subpool 1. 

Created by: Command processor using IKJPOSIT macro 
instruction. 

Used by: Parse. 

Contents: This PCE describes a positional parameter which 


includes a delimiter as part of its syntax. 


-_—---—---- 


| Operation | 
[Diagrams | 
}---------4 
{| 17 | 
(Sipe ae 5 A ake ec cama | a a aa ae === = { 
| Displacement | Field |Size in| |. 
| Dec. Hex. | Name {Bytes | Contents | 
}------------+--—--—-- }-—----}—--------------- ~------------------- - 
| 0 0 | | 2 |Flags: [ 
| | | [Bits Meaning when on | 
| | | | 0-2 B"'001° -- IKJPOSIT PCE | 
| | | {3 PROMPT [ 
| | 4 DEFAULT f 
| | | [5 Reserved (0) | 
| | [6 HELP Ul 
| | | | 7 VALIDCK | 
| l | [8 LIST | 
| | l |9 ASIS | 
| i i [10 RANGE i 
| | | [11 Reserved (0) | 
| | | {12 SQSTRING | 
| | | [13-15 Reserved (0) | 
| | | | 
| 2 2 | | 2 {Length of PCE. | 
| | | | | 
[4 4 | | 2 |Offset in PDL at which PDE is found. | 
| | i | | 
16 6 | { 1 [Type of positional parameter: | 
| | { | 
| | | | Hex | 
| | | |Number Meaning | 
[ | | {i DELIMITER | 
| | | [2 STRING | 
| | | | 3 VALUE | 
| | | [4 ADDRESS | 
| | i [5 PSTRING | 
| | | | 6 USERID i 
| | | | 7 DS NAME | 
[ f | | 8 DSTHING | 
| | | |9 QSTRING | 
| | | JA SPACE | 
| | { | B-FF Not used | 
| 
fe 7 | | 1* [Length -1 of default or prompt 
{ | | } information. | 
| 
iF 8 {| N** |Default or prompt information. 
ae ee eee pelea ese ean eee pee err eesrvee mere rae a an sa a es J 
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ag eit acre a eS Wn eg ee Sa eT ee ee 1 
| Displacement] Field |Size in| | 


N#*# |Help information. *#**# 


|Dec. Hex. | Name [Bytes | Contents | 

De ae 

ea == 2* ‘|Length of total help data including 
jthis field and the following field. 

== ain 1* [Number of help messages. 

= as 2* |Length of help information including 
{this and the following two fields. *¥# 


| 
| 
| 
| 
| 
| 
| 
|X°000° message segment offset. *#* | 
| 
| 

\ | 
3* JAddress of validity checking | 
| rout ine. ### | 
| | 
| *Optional field. | 
| **Optional field of length “N® bytes. | 
|***These three fields are reproduced | 
| for each level of help information. | 


— ee ee ee ee i ee ee ee a 
—_— ee ee ee ee ee ee ee oe eee 
N 
* 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
L 
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PARAMETER CONTROL ENTRY FOR IKJPOSIT MACRO INSTRUCTION (STRING, PSTRING, 
QOSTRING) 


Size: 8 Bytes. 

Located in: Subpool 1. 

Created by: Command Processor using IKJPOSIT macro 
instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE describes a positional parameter which 
does not include a delimiter as part of its 
syntax. 

ae 
| Operation | 
{Diagrams | 
| 17 | 

aS 2 ees : Ee, a a es Se 4 

| Displacement | Field |Size in| | 

|Dec. Hex. | [Bytes | Contents 
eee ne eee f—--_--__-_4._ ge 
0 0 4 |#Character string, zero if omitted. 


| (The string begins at the first 
j|character past the enclosing left 
| punctuation mark.) 


2 enact of the string. (Any 
|punctuation marks around the character 
[is excluded. This field is zero if 
[the string is omitted or if the string 
jis null.) 


|Bits Meaning when on 
| 0 Parameter 1S present. 


{1-7 Reserved (0). 
| 
1 |Reserved (0). 


|Note: If the string is null, the 
[pointer is set, the length is zero and 
[the flag bit is one. 

Seen a a ea cee ee ee re 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
: : 
l | I 
[| 1 | Flags: | 
| | 
| | 
| | 
| | 
l | 
| | 
| | 
| | 
| l 
! | 


fo) 
fo) 
fp ee ee a ee ee ee ee we ee 
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PARAMETER CONTROL ENTRY FOR IKJTERM MACRO INSTRUCTION 


Size: Variable 

Located in: Subpool 1. 

Created by: Command processor using the IKJTERM macro 
instruction. 

Used by: Parse. 

Contents: This PCE describes a positional parameter that 
may be a Constant, Variable or Statement Number 
parameter. 

|Operat ion| 
|Diagrams | 
| 18 | 

.—-—---—---------—---1-—--—- y—--------------------------- 4-------_- i 

| Displacement| Field isize in| [ 

| Dec. Hex . | Name [Bytes | Contents | 
|--——-~--- ---} ----------} ---- ---} —---------—----------------------- { 

{Oo 0 2 | Flags: 


| 
| Bits Meaning when on 
}9-2 B*°110" - IKJTERM PCE 


{3 PROMPT 
DEFAULT 
Reserved (0) 


This term may be subscripted. 
A Reserved Word is chained. 
-15 Reserved 


RPrPrPrP wom AUE 
ne 
i) 


Gr 


b 


ngth of this PCE. 


S} 


fset in PDL to the PDE. 


e of Positional Parameter. 


5 


Ss Meaning when on 
STATEMENT NUMBER 


VARIABLE 

CONSTANT 

ANY (Constant or Variable) 
This is a Subscript term 
Reserved 


eee = 


tes 1 - 2 
Length of parameter-type field 


; 


| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
l 
| 
| 
| 
| 
| 
| 
; 
| 
| 
| 5~ 
| 
l 
| 
| 
| 


Bytes 3 - 4 
|Offset of parameter-type tield (set to 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
: 
| 
ene es 


re —_— oe eee OSte gees ee eee Gee Ge Gee Ee ete Oe qe ae OE cee be eee HE eee Ge Gee SE ee Ge ee Os OS Qe Se 
a = ) 
£ 
fe ee ee cree tee SE ey Oe gee ce ee ee ee ee es ee ee ee ee © ee = 
po ee ee ee Oe ee ee ee © et = © ee en oe ee Gees GA gee Ge ge Gees SE gees Ge gee: Sele am 
NR 
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| 
| 
| 
| 
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| 
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(2 ee a Sek SR can aa a aN aa a am 1 
| Displacement| Field {Size in| | 


| Dec. Hex. | [Bytes | Contents | 
}------------ $---------- t------- }------------------------- ~------------ { 
{11 B | | WN | Parameter-type field. | 
| | | | | 
[Pe a | 1*  |Length of PROMPT or DEFAULT l 
| | | | information. l 
| | | | 
== oo | {| N#** |PROMPT or DEFAULT information. | 
| | | | | 
[== == | | 2* |Offset into the PCL of Subscript PCE. | 
| | | { | 
|-- -- | | 2* [Offset into the PCL of RSVWD PCE. | 
| | | | 
[== == | | 2* | Length of second-level message [ 
| | | |information including this and | 
] | | | following field, specified by the HELP| 
| | | [operand on the mcro. | 
| | | | 
[== = il | 1* [Number of second-level messages. { 
| | | l | 
(== == || | 2% |Length of second-level message { 
| [ |including this and following two | 
| | | | fields. +++ | 
| | | [ 
[== == if | 2* |Message segment offset. ### | 
| l | [ 
== =e. | N** |Second-level message information. *##* | 
| | | | | 
j= =o. | | 3* |Address of Validity checking routine. | 
| | | | [ 
| | | | N Field of variable length | 
l | | | * Optional field. | 
| | l [ 
| | | | *# Optional field of "N" bytes. | 
| | ; | | 
| | | | ***# Repeated for each second-level | 
| | | | message. | 
Sea eee E Nee RNS E ee eae nem eee a! Care yey ee ee AUN ee TR: pp PE een ee ee AD OOO Ea ae ee | 
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PARAMETER CONTROL ENTRY FOR IKJOPER MACRO INSTRUCTION 


Size: 
Located in: 


Created by: 


180 OS/VS2 


Variable. 
Subpool 1. 


Command Processor using the IKJOPER macro 


instruction. 

Used by: Parse. 

Contents: This PCE describes a positional parameter that 
is an Expression. 

fo. 
| Operation | 
[Diagrams | 
| 18 | 
ET SE EE saa Cane Cet ee SaaS 1 
| Displacement |Field {Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
}~----------- +---------- +------- }-------------------------------------- { 
| 0 0 [ | 2 |Flags: | 
| | | | . | 
| | | [Bits Meaning when on | 
| | | 10-2 B‘'111" - IKJOPER PCE | 
| | | |3 PROMPT | 
| | i 14 DEFAULT | 
| | | [5 Reserved (0) { 
| l | | 6 HELP | 
[ | | |7 VALIDCK { 
[ { | {8-15 Reserved | 
| | | | | 
[2 2 [ { 2 [Length of this PCE. | 
| | | | | 
{4 4 | | 2 {Offset in PDL to the PDE. | 
| | | | 
- [6 6 | |} 4 [Bytes 1 - 2 [ 
| | { | Length of parameter-type field. | 
| | | | 
| | [ | Bytes 3 - 4 | 
| | { |Offset of parameter-type field (set to| 
| | [ {x°0012'). | 
| | | l | 
[10 A | | N | Parameter-type field. | 
| | | | | 
== -- | | 2 |Offset into the PCL of RSVWD PCE. { 
| | | | 
|=- == || i 2 {offset into the PCL to OPERND1 PCE. { 
| | | | | 
|-- == {| 2 |/O£f£Eset into the PCL to OPERND2 PCE. | 
| | | { | 
|-- -- | | 2* [Offset into the PCL TERM PCE. Zero if| 
| | | |mot present. { 
| | | 
|-- -- | | 1* [Length of PROMPT or DEFAULT | 
| | | | information. | 
| | | | 
|-- == il | N#** |PROMPT or DEFAULT information. | 
ipa eee eee 5 Ceara eee se ae ee ee a ee ene eee eae ee ee 
(Continued) 
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fo we y (st eee ei Tee ee 1 
| Displacement | Field [Size in| { 
| Dec. Hex .| Name |Bytes | Contents | 
/}-~-~-------- {---------- fanaa fon nnn nn nnn nnn nnn nnn { 
= a= 1* | Number of second-level messages. 
== = 2* | Length of second-level message 
[including this and following two 
| fields .**#* 
== =F 2* |Message segment offset .*** 


N#*# |Second-level message information. *## 


3% |Address of Validity checking routine. 


* Optional field. 
**# Optional field of “"N* bytes. 
|*** Repeated for each second-level 
| message. 


| 
| N Field of variable length. 
| 
| 


ae ae aie 
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! 
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-— a oe nn ns wn eK ne 
Pe ee ee ens ws..020: 
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PARAMETER CONTROL ENTRY FOR IKJRSVWD MACRO INSTRUCTION 


Size: Variable. 

Located in: Subpool 1. 

Created by: Command processor using the IKJRSVWD macro 
instruction. 

Used by: Parse. 

Contents: This PCE describes a positional parameter that 


is a Reserved Word. 


|Note: The following fields are omitted if this PCE is used with the 
{| IKJTERM macro to describe a figurative constant. 


| Operation| 

[Diagrams | 

| 18 | 

eas pe ee a a [a 
| Displacement | Field size in| [ 
| Dec. Hex. | Name [Bytes | Contents } 
Sian ancamee a a ace f==S2=S—>= $a eS eee { 
| o 0 | { 2 | Flags: [ 
| | ( { | 
{ [ | | Bits Meaning when on | 
J { | | 0-2 B*‘101" - IKJRSVWD PCE | 
| { | \; PROMPT [ 
[ | | [4 DEFAULT } 
| [ | {5 Reserved (0) i 
| | [ | 6 HELP [ 
| { { | 7 Reserved (0) [ 
| | [ | 3 IKJTERM macro as a figurative | 
| | | | constant. [ 
{ | | [9-15 Reserved ; 
| | | | 
{2 2 i ; 2 | Length of this PCE. { 
[ | | | [ 
[4 a | | 2 |Ooffset in PDL to the PDE. Zero when | 
| | f | used with IKJTERM macro. j 
Ss OR a es eee EER enna STE aE AREER RRR 

| 

| 
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| 
! 
] 
i 
aie 


—r 
| 6 6 | | 4 [Bytes 1 - 2 | 
| | ; | Length of parameter-type field. 
| | | 
| ; | | Bytes 3 - 4 | 
[ [ | |Offset of parameter-type field (set to] 
; | | | x*°0012"). | 
| ] | | . | 
{10 A [ | oN |Parameter type field. | 
| | | | | 
|-- ee | | 1% j|Length of PROMPT or DEFAULT | 
| [ | | information. | 
| | | | 
(<= == ‘| | N#** |PROMPT or DEFAULT information. | 
i Soe Yeas eee Oe PSS las ae ea Ne eee 2 eee J 
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fee ee aoe ys oe De eS OEY eS ave aye pe nee 1 
| Displacement |Field {Size in | 
| Dec. Hex .|Name {Bytes | Contents [ 
------- --------------------------------------4 
2* |Length of second-level message 
Jinformation including this and 
| following field, specified by the HELP 
joperand on the macro. 
| 


1* j|Number of second-level messages. 
| 

2* |Length of second-level message 
jJincluding this and following two 
| fields.+*+*+*# 


i 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


2* |Message segment offset. +*#* 


N##  |Second-level message information. *#** 


N Field of variable length. 
|* Optional field. 
| ** Optional field of "N" bytes. 
| *** Repeated for each second-level 
| message. 
ee eee a gah eee 


G2 eee Oe ee ee 2 ee ee ee eee ee Ee Se eee 
' 
| 
' 
1 
ae ce ee ce ce ee ee ee ee ee 
i 8 


3 
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PARAMETER CONTROL ENTRY FOR IKJSUBF MACRO INSTRUCTION 


Size: 3 Bytes. 

Located in: Subpool 1. 

Created by: Command processor using IKJSUBF macro 
instruction. 

Updated by: None. 

Used by: Parse. 

Contents: This PCE serves two purposes: It indicates the 


end of the previous subfield (or of the PCL 
itself), and it also indicates the beginning of 
a new subfield. 


(\. 1 

| Operation] 

|Diagrams | 

Caine { 

} 19 | 
(SoS SS a aC aR a a Le a Sa 4 
| Displacement] Field |Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ +---------- }-------}-------------------------------------- ! 
{oO 0 | | | Flags: | 
| | i | | 
| ; | | Bits Meaning when on | 
| | | [0-2 B‘'OO0O' -- end-of-field PCE | 
| ; | {3-7 Reserved (0). | 
| | | | | 
ji 1 | { 2 [Offset in the PCL to the first | 
| [ | | IKJKEYWD PCE, or to the next | 
| ; ; jend-of-field indicator, if there are | 
| [ ; {no keywords in this subfield. The | 
| ; | jnext end-of-field indicator may be at | 
| | | Jan IKJSUBF or an IKJENDP PCE. | 
Aa a i sd J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJIDENT MACRO INSTRUCTION 


Size: 8 Bytes. 

Located in: Subpool 1. 

Creat ed by : Parse. 

Updated by: None. 

Used by: Command processor. 

Contents: Description built by parse upon 


IKJIDENT parameter. 


finding an 


pees 
| 


Operation| 

{Diagrams | 

| 17 | 

a ne ee St ee ee Vie eee a ee a ee pe ASSP SS Ses i 
| Displacement| Field {Size in| | 
| Dec. Hex. |Name {Bytes | Contents { 
|---~-----~-- }---------- $+----~-- }-------------------------------------- ! 
| 0 0 | ; 4 |tCharacter string, zero if omitted. | 
| | | | 
14 4 | { 2 | Length of character string. | 
| | | | | 
{6 6 | | 1 | flags: | 
| | | i | | 
| | | |Bits Meaning when on | 
| | | | 0 Parameter is present. | 
| | | {1-7 Reserved (0). | 
| | | | 
| 7 7 | | 1 | Reserved (0). | 
eae ae reer eee ee ee nee re J 


Section 5: 


ee ee ee ee ec es ee es ee oe ee 2 2 Se 6 eo 6 ee 2 2 eee 


Data Areas 
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PARAMETER DESCRIPTOR ENTRY FOR IKJKEYWD MACRO INSTRUCTION 


size: 2 Bytes. 

Located in: Subpool 1. 

Created by: Parse. 

Updated by: None. 

Used by: Command processor. 

Contents: Description built by parse upon either finding 


an IKJKEYWD parameter or defaulting. 


| Operation | 
|Diagrams | 


Cay ee ee Mic ee SS a aaa a aa aa 4 
| Displacement |Field {Size in| 
|Dec. Hex. | Name {Bytes | Contents 


4 
| 2 [|The number (binary) of the 

| | corresponding IKJNAME PCE in the PCL. 
| |For example, if the keyword found 

{ | corresponds to the first IKJNAME PCE, 
| 
1 


{this field will contain binary 1. 
eed rae ea ee ed 


PARAMETER DESCRIPTOR ENTRY FOR IKJPARM MACRO INSTRUCTION 


Size: 8 Bytes. 
Located in: Subpool 1. 
Created by: Parse. 
Updated by:. Parse. 
Used by: Parse. 
Contents: This 8-byte header is at the beginning of the 
PDL. 
ean 1 
| Operation| 
{Diagrams | 
| 16 | 
fo oe en to Me opt ere ee ReS SSeS 
| Displacement | Field {Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ }---------- $-------4------------------~------------------- { 
| 0 0 | ; 4 j{tNext block of storage. | 
{ | { | 
|4 & | | 2 {Subpool number. | 
| 1 | 
| 6 6 { | 2 | Length. | 
Pa a | Ree a ee re ee A ae es eee J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJPOSIT MACRO INSTRUCTION (ADDRESS 
PARAMETERS) 


Size: 36 Bytes. 

Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command processor. 

Contents: Description built by parse upon finding an 


address parameter. 


| Operation] 

{Diagrams | 

| 17 | 

SB Na aoa eh sh a i se Np ee 1-—_-.-----+ 
| Displacement | Field size mi | 
| Dec. Hex. | Name [Bytes | Contents | 
a hm ao at, ee f-=====- $-------- - - - 
| 0 0 | } 4 |} *¢Load module name -- zero if not | 
| | | |specified. { 
| | | | | 
[4 4 | | 2 |Length1l -- Length of loadname, 7 | 
i | ] jexcluding the period. l 
| | | | | 
| 6 6 [ |} 1 |Flagsi1: | 
| | ! | | 
| | l |Bits Meaning when on | 
| | [ | 0 Iloadname is present. | 
| | | [1-7 Reserved (0). | 
| | | | [ 
|7 7 | } 1 |Reserved (0). | 
| | [ { 
{8 8 | i 4 |*Entry name (name of the CSECT) -- | 
l | i [zero if not specified. | 
| | | | | 
112 Cc | [| 2 | Length2 -- Length of entryname, | 
| | i jJexcluding the period. | 
[ l [ | | 
{14 E | | 1 |Flags2: | 
| | | | ; | 
| l l {Bits Meaning when on ( 
i | | {0 Entryname is present. | 
| | | }1-7 Reserved (0). | 
i | [ | 
[15 F | | 1 |Reserved (0). | 
| | | | 
{16 10 | ; 4 | tAddress string -- zero if not | 
| [ | | specified. j 
| ( | l 
| 20 14 =| | 2 j}Length3 -- Length of address string. | 
| | | [1. Relative address -- excludes the | 
{ | | | pilus sign. | 
| i | }2. Register address -- excludes ] 
| { | f letters. | 
| | | |3- Absolute address -- excludes [ 
| | | | periods. | 
Deo ess gee | ae RARE Ree [eee a pc oe ce ea et J 
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Displacement |Field 


CG pete A er oe ee Ue eee ee re nee 1 
| [Size in| | 
[Bytes | Contents | 
+------- }--------- ----------------------------- { 
j 1 _ | Flags3: | 
| | | 
| |Bits Meaning when on | 
| me Address is present. | 
| |1-7 Reserved (0). | 
| | | 
} 1 |Reserved (0). | 
| { | 
| 1 |Flags&4&: (Indicates type of address) | 
{ | | 
[ | Hex | 
i | Number Meaning | 
| {X*°00° Absolute address. | 
[ [X°80° Symbolic address. | 
| [x°40° Relative address. | 
[ |X°20° General register. | 
[ }x°10"° Double precision floating-point | 
| register. [ 
| [xX°08*° Single precision floating-point | 
| { register. [ 
| | | 
| 1 [Sign ~- Arithmetic sign character used| 
i | before an expression value. This | 
| j|field is zero if not an address | 
; | expression. i 
| | 
| 2 {Indirect count -- The number of levels| 
| Jof indirect addressing. | 
[ | | 
|; 4 | tFirst expression/value PDE -- If the | 
| jaddress is in the term of an address | 
| jexpression, this is a pointer to the | 
| | PDE for the first expression value. | 
| |X*FFOOO000* if not an address | 
{ | expression. I 
[ | 
i 4 |User word for validity check exit [ 
| jroutine. | 
[ | | 
|} 1 [Flag field for use by the command [ 
| | processor -- describes the user word. | 
| | | 
| 3 j|Address field for use by the command | 
| | processor. ( 
[ | 
|} 4 | *Next PDE in the list, if LIST was [ 
[ | specified. [ 
Oa ase ee da es eh ee r 


| Dec. Hex .|Name 
|------------ }---------- 
[22 16 =| 
| | 
| | 
| | 
| | 
io 17 | 
[24 18 | 
| | 
l | 
| | 
| | 
| | 
| | 
| | 
| | 
| 
| | 
| | 
{25 19 | 
| | 
| 
| | 
[26 1A | 
| | 
[28 ic | 
| | 
| | 
| | 
l | 
| | 
[32 20 | 
| | 
[32 20 =| 
| | 
{33 21 | 
| | 
| 36 24s 
| | 
bie eee 5 ganna en ee SEER 
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PARAMETER DESCRIPTOR ENTRY FOR IKJPOSIT MACRO INSTRUCTION (DSNAME, 
DSTHING PARAMETERS) 


Size: 24 Bytes (30 Bytes if LIST was specified.) 
Located in: Subpool 1. 
Created by: Parse. 
Updated by: Parse. 
Used by: Command processor. 
Contents: Description built by Parse upon finding a 
dsname or dsthing parameter. 
eae eS. 
| Operation | 
[Diagrams | 
| 217 | 
EE ioe 1 eae ra , Seana SaaS a ca ReneS ae { 
| Displacement | Field {Size in| | 
| Dec. Hex . | Name |Bytes | Contents | 
}------------ }--—------ $------- {-----—---------------------- === 
0 0 u |tDsname, zero if omitted. (If the 


|dsname is quoted, the pointer points 
|to the character after the quote.) 


| | | | 
| | | 
| | | | 
| | | | 
[4 uy | {; 2 |Lengthi -- Length of dsname. 
| | | Excluding quotation marks, if any. | 
| | | | | 
|6 6 | {| 1 | Flags1: | 
| | | |Bits Meaning when on | 
| | | | 0 dsname is present. { 
( | | [1 dsname is quoted. | 
| | | |2-7 Reserved (0). [ 
| | | | 
17 7 I | 41 |Reserved (0). | 
| | i 
{8 8 | | 4 |tMember -- zero if member is omitted. | 
| | | | | 
J12 Cc [ | 2 |Length2 -- Length of member, excludes | 
| | | | parentheses... | 
| | | | | 
[14 E | | 1 | Flags2: | 
| | | |Bits Meaning when on | 
| | | | 0 Member is present. | 
| | | |1-7 Reserved (0). | 
| | | | | 
[15 F [ | 1 |Reserved (0). { 
| | | | | 
{16 10 =| | 4 | tPassword -- zero if omitted. | 
| | | | 
{20 14 | |} 2 |Length3 -- Length of password. | 
| | | | 
| 22 16 | | 1 | Flags 3: 
| [ | |Bits Meaning when on | 
| | | | 0 Password is present. | 
} | | {1-7 Reserved (0). | 
| | | | | 
| 23 17—C| { 1 |Reserved (0). | 
| | | | | | 
wa 18 | | 4 }tNext PDE in the list, if LIST was | 
| { | j specified. | 
Die eS ee a ee a pe eee eae a a a a a a en J 
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PARAMETER DESCRIPTOR 


(EXPRESSION/VALUE PARAMET ER) 


Size: 
Located in: 
Created by: 
Updated by: 
Used by: 


Contents: 


f. >" =-. = —T 

| Displacement | Field 
| Dec. Hex. | Name 
[------------ $---------- 
Jo a | 

| 

[4 4 | 

l | 

|6 6 

l | 

[8 a | 

| | 

l i 

| | 

| [ 

| | 

| | 

. 

|9 9 | 

| | 

| 

; | 

| | 

{10 A | 

| | 

| { 

{12 C | 

| | 

| | 

| | 

on ee ee d eee ere ree 


ENTRY FOR IKJPOSIT MACRO INSTRUCTION 


16 Bytes. 


Subpool 1. 


Parse. 


Command processor. 


Command processor. 


Description built by Parse upon finding an 


express 


ion/value parameter. 


eee een 
|] Operation| 
|Diagrams | 


a La T 
[Size in| | 


~~ 


-—_— a ee ee ee ee ee ee 


Bytes 


| Contents | 


}~-------------------------------------- ! 
|tAddress string. 


| 
| Length of address string. 


|Reserved (0). 


|Flags: (Indicates type of expression 
| value.) 

( 

| Hex 

{Number Meaning 

[|x°04&"* Decimal expression value. 
{X°O02° Hexadecimal expression value. 

{ 

|Sign -- Arithmetic sign character used 
| before an expression value. This 
[field is zero if it is not an address 
| expression. 

| 

| Indirect count -- The number of levels 
Jof indirect addressing. 


| tNext expression value. (The 

| expression values are forward chained. 
|The last element on the chain is 
Jindicated by X‘"FF000000'.) 


} 
| 
} 
| 
| 
| 
| 
- 
| 
| 
| 
| 
| 
| 
| 
| 
! 
| 
' 
[ 
( 
| 
l 
{ 
l 
| 
| 
l 
[ 
| 
| 
( 
| 
l 
| 
| 
| 
| 
| 
| 
| 
l 
( 
| 
| 
1 
es 
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PARAMETER DESCRIPTOR ENTRY FOR IKJPOSIT MACRO INSTRUCTION (USERID 


PARAMETER) 
Size: 
Located in: 
Created by: 
Updated by: 
Used by: 


Contents: 


16 Bytes (20 Bytes if LIST was specified. 


Subpool 1. 


Parse. 


Command processor. 


Command processor. 


Description built by parse upon finding a 
userid parameter. 


(oe 1 

| Operation | 

[Diagrams | 

--------- ! 

| 17 | 
"SE aS | sa rao ape mi ,----— = ses SSS ee See Sea eee = iS 2SSa= = 
{Displacement |Field |Size in| | 
|Dec. Hex. | Name |Bytes | Contents [ 
}------------ $---------- t------- }—------------------------------ ------+{ 
| 0 0 | | 4 | tUserid. | 
| | | l | 
| 4 4 | |Lengthl -- Length of userid. | 
| | | | f 
| 6 6 | { 1  |Plagsi: | 
| | | | . 
| | ] |Bits Meaning when on | 
| | | | 0 Userid is present. | 
| [ |1-7 Reserved (0). | 
| { | ; 
[7 7 ; } 1 {Reserved (0). | 
{ | | [ 
[8 8 i | 4 | *Password. | 
| | | i I 
{12 Cc | | 2 {|Length2 -- Length of password, | 
| | | }excluding slash. { 
| | | | 
j14 E | | 1 | Flags 2: 
{ | | | | 
| | | Bits Meaning when on | 
| | | | 0 Password is present. 
{ | | {1-7 Reserved (0). | 
| | | | l 
}15 F | | 1 |Reserved (0). | 
| | l | 
[16 10 | | 4 |*Next PDE in the list, if LIST was | 
| | | | specified. | 
bss teeta | ee a ee ee L 1 J 


— ae eee ee ee ee ce ee ce es ee es es ee ee es es es i es ae ee es es es se oe ee ee ee 
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PARAMETER DESCRIPTOR ENTRY FOR IKJPOSIT MACRO INSTRUCTION (VALUE 


PARAMETER) 
Size: 8 Bytes (12 Bytes if LIST was specified.) 
Located in: Subpooli. 
Created by: Parse. 
Updated by: Command processor. 
Used by: Command processor. 
Contents: Description built by Parse upon finding an 
IKJPOSIT parameter. 
Bey aN 
| Operation| 
|Diagrams | 
| 17 | 
-=2 = Spas ssa = ho a ee - eS 1 
| Displacement| Field {Size in| [ 
| Dec. Hex. | Name |Bytes | Contents | 
[~----------- t---------- +~------ {------------------------------------—- { 
{0 ) | | 4 |*To character string. (The string [ 
| | | [begins at the first character past the| 
| | | j|quote. This field is zero if not [ 
| { | | specified.) [ 
| | l | 
{4 4 | | 2 {Length of character string, excluding | 
{ | | [the quotes. | . 
| | | | | 2 
| 6 6 | } 1 | Flags: | 
| | l | 
| | | {Bits Meaning when on | 
i | { | 0 Parameter is present. | 
| | { [1-7 Reserved (0). | 
[ | i | | 
| 7 7 | | 1 |Type-char (The letter preceding the | 
f | | | quoted string.) | 
| | | | | 
|8 8 | | 4 j*Next PDE in the list, if LIST was | 
| [ | | specified. | 
Bete Soe fee eee Ms rt tis a ee ee J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJTERM MACRO INSTRUCTION (CONSTANT 
PARAMETER) 


Size: 20 Bytes (24 if LIST is specified). 
Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command Processor. 

Contents: Description built by parse upon finding a 


CONSTANT parameter. 


a anrmiad 1 
| Operation| 
[Diagrams | 
| 18 | 
aa rt pa a a aa sa) am sare acct henge Bs re ee ge ea ere aaa 
| Displacement]| Field |Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
}------------ }---------- }----~--}-------------------------------------- ' 
| 0 oO | 1 |Length1 - Length of term entered but | 
| | | [not including signs, decimal points or| 
| | | | apostrophes. . 
{1 1 | | 1 |Length2 - For floating-point, length | 
| | | |of digits following letter E. | 
| | | | 
[2 2 | | 2 | Reserved. | 
| | | | | 
{4 4 { | 2 | Reserved word number - Number of | 
| | [ | IKJNAME macro that corresponds to the | 
| | | entered name. | 
| | | | | 
{6 6 | | 2 | Flags: | 
| | | |}Bit Meaning when on | 
| | | [Byte 1 ; | 
| | | {0 Parameter is present. | 
| | | }1 Constant. l 
| | | {2 Variable. l 
| | | {3 Statement number. | 
| | | | 4 Fixed-point numeric lteral. | 
| [ | {5 Non-numeric literal. | 
| | | | 6 Figurative constant. | 
[ | | |7 Floating-pt. numeric literal. | 
| | | |Byte 2 | 
| | | | 0 Sign on constant is minus. | 
| | | 1 Sign on exponent of floating | 
| | | | point is minus. | 
| | | | 2 Decimal point is present. | 
| | | }3-7 Reserved. | 
| | | | | 
| 8 8 [ | a4 {Pointer to string of digits. | 
| | | | | 
}12 Cc | ; 4 |Pointer to the exponent. | 
| | | | | 
| 16 10 | | 4 |Pointer to the decimal point. | 
| | | | | 
| | | |Note: -Pointers are zero if not | 
| | | | present . | 
a ie ee eee eee i J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJTERM MACRO INSTRUCTION (VARIABLE 
PARAMETER) 


Size: 20 Bytes (24 if LIST is specified). 
Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command Processor. 

Contents: Description built by parse upon finding a 


Variable parameter. 


S70 eh 1 
| Operation| 
{Diagrams | 
} a a 
| 18 | 
(oo. - eo Veo ono ee sa aac aaa i 
| Displacement] Field {Size in| | 
| Dec. Hex . | Name {Bytes | Contents | 
|------------ $---------- +------- $-------------------------------------- { 
| 0 0 | | 4 | Pointer to data-name. | 
| | | | 
{4 u | | 1 |Lengthi - Length of data-name. | 
| ! | | | 
[5 5 | { 1 | Reserved. | 
| | | | 
[6 6 «| | 1 | Flags: | wi 
| | | 
| { | | Bits Meaning when on | 
| | | {0 Parameter 1S present. | 
| | | j1 Constant. | 
| | | | 2 Variable. | 
| | | {3 Statement number. | 
[ | | }4-7 Reserved. | 
| | | | | 
{7 7 [ | 1 | Reserved. | 
| | | | | 
|8 8 | | 4 j}Pointer to PDE for first qualifier. | 
{ | | JSet to X'FFOO0000' if no qualifiers. | 
| | | | | 
{12 C | {| 4 | Pointer to program-id name. | 
| | | | 
| 16 10 =| } 1 jLength2 - Length of program-id name. _ | 
| | | | | 
{17 11 | | 1 |Number of qualifiers. | 
| | | | 
{18 12. | } 1 {Number of subscripts. | 
| | | | | 
{19 13 «| { 1 | Reserved. 
| | | | | 
| | | |Note: Pointer, length and number | 
[ | | {fields are zero if not present. | 
be Een eee eee ee y ne ee ee Oa ee a ee et ee! J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJTERM MACRO INSTRUCTION (VARIABLE 
PARAMETER - DATA-NAME QUALIFIER) 


Size: 12 Bytes. 

Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command processor. 

Contents: Description built by parse upon finding a 


data-name qualifier on a VARIABLE parameter. 


| Operation| 

|Diagrams | 

| 18 | 
~-----------y---------- y-~-----1----------------- + ----------L-------= | 
| Displacement] Field |Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ t---------- }------- }------------------------------------—- ! 
| 0 0 | {| 4 |Pointer to data-name qualifier. | 
| | | | | 
|4 4 | | 1 |Lenoth of data-name qualifier. [ 
| | | | | 
|5 5 | | 1 | Reserved. |. 
| | | | | 
| 6 6 | j 1 | Flags: [ 
| | | 
| { | |Bits Meaning when on ( 
| | | |0-7 Reserved. | 
| | | | | 
| 7 7 | { 1 | Reserved. | 
| | | | | 
| 8 8 | | 4 |Pointer to PDE for next qualifier. | 
| [ H Peet to X'FFO000000" on last qualifier. | 
seo tes 5 Ge eae gee a re pa ne) SR ek pee Nee pen ae PO lc ce Serie ce Pr 4 
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PARAMETER DESCRIPTOR ENTRY FOR IKJTERM MACRO INSTRUCTION (STATEMENT 
NUMBER PARAMETER) 


Size: 20 Bytes. 

Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command processor. 

Contents: Description built by parse upon finding a 


Statement Number Parameter. 


Rope ee 1 
| Operation| 
|Diagrams | 
| 18 | 

er ee : ne a ee a as i 4 

| Displacement] Field |Size in| | 

| Dec. Hex. | Name |Bytes | Contents | 
|------------ t---------- t-—----- to--+-<-~~-2 ~~ ----------- === ! 
fe) 0 | | 1 |Lengthi - Length of program-id. | 
| | : | 

[1 1 | } 1 |Length2 ~ Length of line number. | 

| | | | 

[2 2 | { 1 |Length3 - Length of verb number. | 

| | | | | 

| | | |Note: Lengths do not include periods | J 

| i | jand are set to zero if not entered. | 

| | | | | 

{3 3 | | 1 | Reserved. | 

| | | | | 

[4 4 | {| 2 | Reserved. | 

{ | | | | 

[6 6 | | 2 | Flags: [ 

| | | . | 

[ | | {Bits Meaning when on | 

| | | ae) Parameter is present. | 

| | | {1 Constant. | 
| | | {2 Variable. | 
| | | | 3 Statement number. [ 
| | | }4-15 Reserved. 
| | | | | 
| 8 8 | } 4 | Pointer to program-id. | 
| | | | | 

J12 Cc | j; 4 | Pointer to line number. i 

| | | | | 

{16 10 | i 4 | Pointer to verb number. | 

| | | | 

i [ | |Note: Pointers are set to zero if not| 

| { | jentered. | 

aceee eee eee ea teres gees epee eae ee eerie neat as a a a ie hh J 
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PARAMETER DESCRIPTOR ENTRY FOR IKJRSVWD MACRO INSTRUCTION (RESERVED WORD 
PARAMET ER ) 


size: 8 Bytes. 

Located in: Subpool 1. 

Created by: Parse. 

Updated by: Parse. 

Used by: Command processor. 

Contents: Description built by parse upon finding a 


reserved word Parameter. 


(gee 1 
| Operation| 
[Diagrams | 
| 18 | 

a aE Me 5 eerie Sa a a a a Sees 

| Displacement| Field {Size in| | 

| Dec. Hex. | Name |Bytes | Contents | 

[------------ }---------- }-------}-------------------------------------- { 

ine 0 | | 2 | Reserved. 

| | | | 

| 2 Z | {| 2 |Reserved word number - Number of the 

| | | | IKJNAME macro that corresponds to the 

; i | | entered name. 

| | | | 

{4 4 [ | 2 | Reserved. 

l | | | 

[6 6 | | 1 | Flags: 

| | | | | 

| | | | Bits Meaning when on 

i | { me Parameter is present. 

| | l }1-7 Reserved. 

| | | | 

| 7 7 | | 1 | Reserved. 

bse Se pe ae eee  ierreeeeee I iS af a Ss 
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PARAMETER DESCRIPTOR ENIRY FOR IKJOPER MACRO INSTRUCTION (EXPRESSION 
PARAMETER) 


Size: 8 Bytes. 

Located in: Subpool ds 

Created by: Parse. 

Updated by: Parse. 

Used by: Command processor. 

Contents: Description built by parse upon finding an 


Expression Parameter. 


Eee oe a 7 
| Operation | 
{Diagrams | 
| 18 | 
fe a toy oa Mt rR ge I ee RS { 
| Displacement |Field [Size in| | 
{Dec. Hex. | Name [Bytes | Contents | 
}—-—----~--- }--—----—- }-—----}-----------------------—-----—-------- { 
| 0 0 ; i 4 | Reserved. | 
| | | | 
\4 4 | { 2 | Reserved. | 
| | { | | 
| 6 6 | | 1 | Flags: | 
| | | | . | 
| | | |Bits Meaning when on | 
| | | | 0 Parameter is present. | ) 
| | | }1-7 Reserved. | 
| | | | 
|7 7 | } 1 | Reserved. | 
bs Me ahh ee a BA se Se ie A ee 4 
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PARSE PARAMETER LIST (PPL) 


Size: 28 bytes. 
Constructed by: Command processor. 
Located in: Subpool 1. 
Updated by: Parse. 
Used by: Parse. 
Contents: Parameter list for parse. 
(SSS se | 
| Operation | 
[Diagrams | 
[| 15 | 
oso a : Sac SSP uaa acorn sa nena a ars | 
| Displacement |Field |Size in| | 
|Dec. Hex.|Name [Bytes | Contents | 
}------------}---------- +------- }-------------------------------------- { 
| 0 0 | PPLUPT | 4 |t User profile table (UPT). | 
| | | | | 
| 4 4 | PPLECT | 4 |#¢ Environment control table (ECT). | 
| | | | | 
| 8 8 | PPLECB } 4 |# Event control block. | 
| | | | | 
}12 Cc | PPLPCL | 4 |t Parameter control list (PCL). | 
| | [ | | 
{16 10 |PPLANS | 4 |[* fullword area where parse will place| 
| { | {the address of the PDL. | 
| | | | | 
{20 14 |PPLCBUF | 4 |* Command buffer (CBUF). | 
| | | | 
{24 18 |PPLUWA | 4 |t user work area (for validity check | 
| ; | |routines). | 
Pet ee $a | Caen eeeen a neres Bt a Ss eee J 


Section %: Data Areas 199 


PARSE PERMANENT WORKSPACE (PWORK) 


Size: 4Y4UO bytes. 

Constructed by: Parse. 

Located in: Subpool 0. 

Updated by: Parse and IKJPARS2. 

Used by: Parse and IKJPARS2. 

Contents: Parameter lists for routines, input stack, 


temporary PDE for positional parameters, parse 
save area, internal tables and work areas. 


Sani Sera. 
| Operation| 
{Diagrams | 
| 16 | 
(=> >So 5b React {7 -4-== Sas nam a ana es aa ea { 
| Displacement| Field [Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
J-~—----~~-----—---—--- t------- $—~----~--------~-—--~--------—----- ! 
| 0 0 | PWORK | 72 }18-word register save area. | 
| | | | 
[72 88 |PDWORD | 8 |Scratch/save/convert area. | 
| | | | 
[80 50  |ENDINPUT | 4& |t end of command buffer. Used to | 
| | | {determine end-of-field. | 
| | | | 

{84 54 |PPOINTR | 4 [* first character scanned. | ) 
| | | | | 
[88 58 |PLENGTH } 2 {Length of field scanned. | 
| l i l | 
{90 SA | RETCODE { 1 jReturn code. | 
| I { | 
{91 SB. .[-s=ss=== | 3 {Not used. | 
| [ { | 
| 96 60 |SUBRWORK | 8 |Scratch/save area for GETCORE routine. | 
| | | | 
{104 68 |XPDL ; 4 [* Parameter descriptor list (PDL). | 
i | | 
{108 6C |TEMPSAVE | 4 |Used to temporarily store register 1 | 
| [ | | before linking to ATRANQ routine. | 
| | | | | 
J112 70 | PFLAGS { 1 [Permanent workspace flags. | 
| | | | | 
| | | [Setting Meaning { 
| | PFLIST | {x*so°* List is being processed. | 
| | l { | 
{ | PF DEFLT | |x°4O0° Default has been supplied. | 
| | | | 
| | PF ENDF i | x*20° End of buffer has been | 
{ | l | reached. | 
| | | | 
| |PFKEYFND | |x*10° Keyword match has been found. | 
{ | | l | 
| | HEXBIT | {x°O8° Address expression contains a | 
| | { hexadecimal character. | 
L L L J 


| 
SED ae a eel REE EN GREET a ee ear ne Cee See ZOE RE ue ene Se Se es MeV Un ONO Res 2 tr EO NR, St he ON er Le 
(Continued) J 
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Pig es te oe eg re a a a pe oe a ie eigen ee aay ote eee ey 
ipisplacement Field {Size in| | 
| Dec. Hex .|Name {Bytes | Contents | 
|------------4---------- $------- }-------------------------------------- { 
| | PFNEW | |x*02" Used by address routine to | 
| | | | - indicate a new valid address | 
| | | [ entryname (with or without | 
| | | | loadname qualification). | 
| | | | { 
| | DECBIT | xo * Address expression is decimal. | 
| | | | | 
{113 71 |PFLAGS2 | 1 |Second flag byte. | 
| | | | | 
| | | |Setting Meaning | 
| |PFSKPINV | |x*"80° Validity check routine [ 
| | i | requested a reenter message | 
| | | | — | 
| | RNGEVAL1 | |xX*4O° Address routine processed | 
| | | | first value of range | 
| H | | parameter. | 
| | | | | 
| | ONERBIT [ |}x'20° Control bit used during scan | 
| ; | | by address routine. | 
| | | | | 
| | TWORBIT |x*'10° Control bit used during scan | 
| | | | py address routine. | 
| | | | | 
| |RNGEVAL2 | |x'O8* Address routine processed ‘| 
| | | | second value of range | 
| | { | parameter. | 
| | | | | 
| | REGBIT | |x'Ou' Control bit used during scan | 
| [ | | by address routine. | 
| | | | | 
| |FLTERBIT | |x*02'" Control bit used during scan | 
[ | | by address routine. | 
| | | | | 
| | BREAKBIT | ;x"O1' Used by address routine to { 
| { | | indicate a break character in | 
| [ | | the parameter. | 
| | | | 
{114 72 =%|PFLAGS3 | 1 {Third flag byte. | 
| { | | 
| | | | Setting Meanin | 
| |PFESTPRMT | |x" 80° Prompt for string. | 
| | | | | 
| | PFONE | [|x"4o* At least one PDE has been | 
| | | | built. | 
| | | | 
| | LOADBIT | |x" 20° Control bit used by address | 
| | | | routine to indicate loadname | 
| rn ae 
| [eNTRYBIT | |x" 10° Control bit used by address | 
| | | { routine to indicate entryname | 
| | | . data. | 
| 

| | PFNULL | [x*' Os" A null line was entered after | 
| | | | ‘a prompt. | 
| | | | | 
{ | LPRNFND { ;x*ou® A left parenthesis was found | 
| | | | by the error routine. | 
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fo ee a Se ar en er hr eg arg mr ee Ot Ne, Peg OT ee eee ye wot e 1 
| Displacement| Field |Size in| | 


|Dec. Hex. | Name | Bytes | Contents | 
aa anna }---------- $------- fee Se ee ee { Jd 
| PESPACE | |x*O2'° A positional space parameter | 
| | | was found; the positional [ 
| i | String routine knows when to_ | 
| { | end the string. ( 
| | | 
| PFMORE | | x*O1" The left parenthesis of a ] 
[ | | subfield was also used as the | 
| | | left parenthesis of the list | 
| | within the subfield. | 
| | | | 
115 73  |PFLAGS4& | 1 |Fourth flag byte. | 
| | | | 
| ] [Setting Meaning | 
|PFENDLIM | |x° 80°" End of self-delimiting string | 
| | | found. | 
| | | | 
|PFLSTEND | |x*"40° End of LIST#. | 
| | l | 
| PFVCMSG f |x" 20° Validity check routine | 
| | [ message. | 
| | | . | 
|PFPDDATA | |x°10° Processing prompt or default | 
[ | | data. | 
| l | | 
| PFSLASH | |x°os* Password for DSNAME/USERID. | 
| | | | 
|PFENDSErT | |x* Ou" Backup pointer for ENDINPUT. | 
| l | | 
| PFNOPOP ; |x" 0o2° Do not remove the top element | 
| | t from the stack. | J 
| | l | 
| CKRANGE | |x*O1° Check for RANGE. | 
| | | 
116 74 |PFLAGS5S | 1 [Fifth Flag Byte. | 
| { | | 
120 78 #=|PANCHOR A |* last area of main storage space. | 
| | | | 
124 7C |PANCHORT | 4 |/¢ internal main storage space anchor. | 
| | | | 
128 80 |PGETLIST | {Parameter list for GETCORE routine. | 
| | | | 
128 80 |PGETLNTH | 4 |Number of bytes requested. | 
| | | | 
132 84 |PGETADDR | 4 |* place in which address of storage is| 
| | {to be placed. | 
136 88 |PGETMDSP | 2 |Subpool number from which to get | 
| [ | storage. | 
| | | | 
140 8c | | | First input stack. | 
| | | ; | 
140 8C |PIPDLCUR J] 4 | Current stack (Initially points to | 
l | | PIPDLCHN) . | 
144 90  |PIPDLCHN | 4 |* Next lower stack (0). | 
| l | | 
148 94 | {| 80 {Storage for first stack. | 
| | | | 
228 EG | PIPDLX | 1 | Index to next free space in this input] 
{ { [stack (Initially points to PIPDLCHN:+ | 
| | 
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Poo ee ee /<(ecnaoaenn ra eC a a a a a ea a 7 
| Displacement| Field |Size in| | 


| Dec. Hex. | Name lBytes | Contents | 
}------------ {---------- t------- |~-----~------~-—--------~-----------=- { 
;229 ees SS | 3 {Not used. 

| 
232 E8 PLINKSV1 4 |Save area for return addresses 


Jinternal subroutines which use other 
[internal subroutines. The latter may 
| use still other subroutines. 


| 
| | | 
| | | 
| | 
| | l 
| | | 
| | us | 
| 236 EC INVPSAVE | 4 [Address of invalid parameter. | 
| | | | 
| 240 FO | {Addresses tor keyword scans. | 
| | | | | 
| 240 FO |PKEYWDPS | 4 |Address of current IKJNAME PCE. { 
| | | | | 
| 244 F4 |PKEYWDPC | yy |Address of current IKJKEYWD PCE. | 
| | | | 
| 248 F8 |PKEYWDPX J 4 [Save area for IKJKEYWD PCE address | 
| | y |when erasing the corresponding PDE. | 
| | | | | 
| 252 FC |PKEYWDTB | 4 {Address of keyword PCE for which a | 
| | | jname PCE has been found. [ 
| | | 7 | { 
| 256 100 | PKEYWDPM | 4 [Address of IKJKEYWD PDE. | 
| | | | | 
| 260 104 |PTABLEAD | 4 [Address of the start of the PCL. | 
| | | | | 
| 264 108 |PTABLEND | 4 |Address of the end of the PCL. | 
| | | | | 
| 268 10C | TEMPPDE | |Temporary PDE for positional | 
| | | | parameters. (80 Bytes) | 
| 268 10C | TEMPPDE2 | | [KJPARS only (36 Bytes) { 
| | | { | 
| 268 10C |DATAPTR1 | 4 [Address of string, pstring gstring, | 
| | | | password, dsname, loadname, or value. | 
| | | | | 
| 272 110 |DATALEN1 | 2 |Length of string, pstring, gqstring, | 
| | | |password, dsname, loadiname, or value. | 
| | | 
[274 112 |DATAFLA1 | 1 |x"80"'--above parameter present | 
{ | | |x"00'--above parameter not present | 
| | | | | 
[275 113 |DATAFLB1 | 1 |Type code for value. | 
| | | | | 
{276 114 |DATAPTR2 | 4 | Address of member or entry name. | 
| | | | | 
[280 118 |DATALEN2 | 2 |Length of member or entry name. | 
| | | | 
| 282 11A |DATAFLAZ2 | 1 |X°80'--member or entry name present. | 
| | | |X"00‘'--member or entry name not | 
| | | | present. | 
| 283 11B |DATAFLB2 | 1 {Reserved (0). | 
| | | | 
| 284 11C | DATAPTR | 4 j|Address of password or address. | 
| | { | | 
{288 120 |DATALEN3 | 2 [Length of password or address. | 
| | | 
| 290 122 |DATAFLA3 | 1 |X"80'~-Password or address present [ 
| | | |X"00'--Password or address not present| 
| | | | 
J291 123 |DATAFLS3 | 1 | Reserved. | 
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Regt ee ite eee ee ta ee Net en tte Or ee bee gw SNe eh en ey eae oa, 1 
| Displacement| Field |Size in| | 
|Dec. Hex. | Name [Bytes | Contents | 
{292 124 , DATAFLAC 


1 |Following four fields used by address 
i | ) 


|routine. Register notation. 


| | 
| : 

| 
{293 125 ,DATASGN' | 1 |Sign of first value. | 
| | | | 
294 126 |DATAICT | 2 | Indirect addressing count. | 
| | | 
296 128 DATAEXP | 4 |* next expression/value PDE. | 
| | | 
300 12C ,;DATAUSER | 4&4 | User word. | 
; | | | 
304 130 ,|ENDBACKUP | 4 | IKJPARS2 additions to temporary PDE. | 
| | | | 
348 15C |ENDBAKUP | 4&4 | Backup for ENDINPUT. | 
| | | | 
352 160 |PDELIM | 1 |Self-defined delimiter stored by | 
| | |DELIMITER routine. l 
| | | | 
353 161 |PPCOUNT | 1 j|Length of the PCE. l 
| l | 
354 162 |PPDE. SIZE| 1 j|Length of the PDE. | 
| | | | 
355 163 |PERRCODE | 1 | Index to address table for rescan | 
| [ Jaddress after prompt or default. | 
| l | | 
356 164 |PKEYWDVL | 4& |Number of IKJNAME in PCE for keyword | 
| ; | found. | 
| | | 
360 168 |RNG2ADDR | 4&4 |* second PDE for a range. 
| | | | 
364 16C |SEGLIST | 20 ]List of message segments for PUTLINE | 
| | jand PUTGET service routines. | 
| | | | 
384 180 |PREVPDEL | 4 |* previous PDE. Used by the validity | 
| | [check exit routine. | 
| | | 
388 184 | VCEPARAM | 12 |Parameter list for validity check exit| 
i | | routine. | 
| | | 
388 184 |PDEADR | 4 |* PDE just constructed. | 
| | | | 
392 188 |USERWORD | 4&4 |Seventh word from PPL. | 
| | | | 
396 18C |VALMSG | 4 {* second level message. Initialized | 
| | [to X*FFOO0000° by parse. | 
| | | | 
400 190 | MSGCODE | 1 jIndex to message address. | 
| | | | 
| | {Message segment containing the last | 
| | |primary message ID. This is used as | 
| | |the first segment in a HELP message | 
| | |passed to PUTLINE and PUTGET. It l 
| | {contains the byte header required by | 
| | | PUTLINE and PUTGET and the word | 
| | | "ENTER". | 
401 191 |PRIMSGID | 21 {Primary message segment. | 
| | | | 
422 1A6 |SAVLSLEN | 2 |Save area for storing main storage | 
| | {size of HELP message routine. | 
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feo Co. s : Eis a Di epg err geese ar en OE ee eS 1 
| Displacement| Field 


|Size in| | 
| Dec. Hex. |Name [Bytes | Contents | 
~~-------=-}---------- }-------4------------------------------------~-] 
$424 1A8 | PLUSSEG | 8 | Second-level message segment. | 
| | | 
|. 432 1B0 |PUTLPTR | 4 |t PUTLINE service routine. | 
| | | 
[436 1B4 |PUTGPTR } 4 |* PUTGET service routine. | 
| | | | | 
1440 1B8 |SRPARAMS | {1/0 parameter list used when linking | 
[ | | |to PUTLINE or PUTGET. | 
| | | | | 
| 440 1B8 | UPTADDR ; 4 |t User profile table (UPT). | 
| | | | | 
, 444 1B5 | ECTADDR ; 4 [ft Environment control table (ECT). | 
| | | | | 
| 448 1C0 |ECBADDR {| 4 |t Command processor's ECB. | 
| | | | 
}452 ic4 |A00000 { 4 |} * Parameter block. | 
| | | | 
{456 1C8 |OPERAND } 4 |Pointer to last PCE under an IKJOPER | 
| | | | PCE. | 
| | | | | 
1460 1CC |RSVWDPCE j 4 | Pointer to IKJRSVWD PCE. | 
| | | | , | 
{464 1D0 |TERMXPCE | 4 | Pointer to IKJTERM PCE. l 
| | | | | 
{468 1D4 |OPERPCE ; 4 | Pointer to IKJOPER PCE. ‘| 
| | | | | 
[472 1D8 |OPERSVE ; 4 |Pointer to left parenthesis of | 
| | j |expression in process. | 
| | | | | 
1476 1D6 |RSVWDSV1 | 4 |LINK reg. SAVE AREA | 
| | | | | 
| 480 1EO |RSVWDSV2 | 4 | LINK reg. SAVE AREA | 
| | | | | 
|} 484 1E4 |CBLNKSV1 | 4 | LINK reg. SAVE AREA | 
| | | | | 
{| 488 1E8 |CBLNKSV2 ; 4 |LINK reg. SAVE AREA | 
| | | | 
{492 1EC |ENDNMPTR | 4 |Pointer to end of last data-name | 
| | | | scanned. | 
| | | | 
|496 1FQ |CHAINPTR | 4 | Pointer to chain word for data-name | 
| | | {qualifier PDEs. | 
| | | | | 
| 500 1F4 |PDEPTR f 4 | Pointer to next available space in the| 
| | | {temporary PDE. [ 
| | | | | 
| 504 1F8 |AANC | 4 | Storage anchors used to control | 
| | | | | 
[508 1FC |{TANC | 4 | allocation of data-name qualifier | 
| | | | | 
{512 200 |OANC {| 4 | PDEs in storage obtained by | 
| | | | | 
{516 204 |ENDANC {| 4 | the STALOC routine | 
i | | | 
[520 208 |PRMTPTR | 4 {Pointer to start of invalid data for | 
| | | | special message format. | 
| | | | | 
{524 20C |OPERLL } 2 |Length of all PDE fields under the | 
| | | [| IKJOPER dnd associated PCEs. | 
LS eee e eee fee es eee Meth See I i gid J 


(Continued) 


Section 5: Data Areas 


205 


fe fe i. De rar ree re te ee ee ey ee Te 1 
| Displacement] Field [Size in| | 
| Dec. Hex. | Name |Bytes | Contents | 
}------------ +----~----- f------- fo ~- 2 --- $n nnn nnn nnn nnn nnn nnn nnn 
| | | ee | 
| 526 20E |MSGAREA | |Special message (6 Bytes) | 
| | | | 
{526 20E |MSGLEN } 2 |Length of first segment for special | 
| | | [message format. | 
| | | | | 
| 528 210 |MSGADDR | 4 {Pointer to first segment for special | 
| | | |message format. | 
| | | | 
[532 214 |DIGITCT | 1 [Counter for length of digit strings. | 
| | | | 
| 533 215 |ELEMNCT | 1 |Number of data name qualifiers. | 
| | | | | 
|534 216 | QUALCT | 1 [Number of data-name qualifiers. | 
| | | | | 
}535 217 |CBFLGS1 {j 1 |Flags set as follows: | 
| | | | 
( | COBOLMOD | {X°80" - IKJPARS2 has been entered. 
| | | I | 
| JOPERMODE | [|X*°4O"* - IKJOPER has been entered. | 
| | | | | 
| |SUBSMODE | }X°20° - IKJTERM is processing a | 
| | | | subscript. | 
| | | | | 
| |NAMEREQD | }X°'10° - IKJTERM expects a data-name to| 
| | { | follow in the buffer. | 
| | | 
| |ERRORBIT | }X°O08° - IKJTERM encounters an error. | 
| | | | | 
| |RSVDPRMT_ | |x"°O4° - A reserved word has been | 
| ! peraer= for. | 
| J|OPERPRMT | |X°02° - An expression has been | 
| | | {prompted for by IKJOPER. | 
| | | | 
| |] RC16 | }x°01° - A 16 return code is returned. | 
| | | | | 
[536 218 |CBFLAGS2 | 1 | Flags set as follows: | 
| | | | 
| |SPECMSG | [x°80" - A special format error message| 
| | | jis necessary. | 
| | | | 
| |LFTPAREN | {X'4O" - A left paren is to be inserted] 
| | | [in the special message buffer. [ 
| | | | 
| |RHTPAREN | |x*°20° - A right paren is to be [ 
| | | |inserted in special message buffer. | 
| | | | 
| {CHAINTRM ] {X°10* - A chained IKJTERM macro is in | 
| | | ‘aaa { 
| 
[ | PARS2IN | |X°O08° - PARS2 is loaded. | 
| | | | | 
| | PRMTSCAN_ | {|x*°O4" - Prompt data being scanned. [ 
| od | | | 
| |BUFPOPELD | |X*°O02° - Buffer popped in SCANF | 
| | | | routine. | 
| | | | | 
| | RNGADDED | |X'01" - First value of RANGE is added. | 
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(ea Cre aces era Wee Ay er eg nn Ee a ee 7 
| Displacement | Field |Size in| | 


| Dec. Hex. | Name |Bytes | Contents | 
}------------ }---------- ------- }~------~---------------~-------------- { 
{537 219 |CBFLAGS3 | 1 |Flags set as follows: | 
| | | | 
| |FIRSTNAM | |X'80" - First Variable data-name. | 
| | | | | 
| | CTFOUND | }X*4O" - Beginning of subscript found. | 
| | | | 
| |BLNKFLAG | }x'20*° ~ Blank in invalid message | 
| | | format. [ 
| | | | 
|538 21A |CBFLAGSG | 1 | Reserved. | 
| | | | | 
|539 21B | | 1 | Unus ed. | 
| | | | | 
{540 21C |TRANAREA | 2 | IKJTERM compares for OF or IN. | 
| | | | | 
}542 21E |CORELEN {| 2 |Reserved. | 
| | | | | 
[544 220 |PARS2ADR | 4 | Address of IKJPARS2 load module. | 
| | | | 
{548 224 |VCONAD | 4& | Address of VCON table in IKJPARS. | 
| | | | | 
[552 228 |GOREGSV ; 4 |Return address from subroutine. | 
| | | | 
|556 22C |TERMBASE | 4 | IKJTERM base reg save area. [ 
| | | | 
|560 230 |OPERBASE | 4 | IKJOPER base reg save area. | 
| | | 
[564 234 |BASE3SV | 4 | PARSE REG3 save area. [ 
| | | | | 
[568 238 |BASE2SV | 4 | PARSE REG2 save area. - | 
| | | | 
1572 23C |BASEISV | 4 | PARSE REG1 save area. | 
| | | | 
|576 240 |RBASESV | & | PARSE RBASE reg save area. | 
| | | | 
{580 244 |CBLRET ; 4 | Pointer to IKJPARS2 after using [ 
| | | | subroutine in IKJPARS. | 
| | | | | 
|584 248 |COREADDR | 4 jAddress of storage for message. | 
| | | | 
|588 24C |AUTOBASE | 4 |DATAREG save area. | 
| | | | | 
| 592 250 |WORKSAVE | 16 |WORK registers save areas. | 
| | | | | 
{608 260 |PLINKSV2 | 4 |Return address from Validity Check | 
| | | | rout ine. ; 
| | | 
{612 264 | PUTLINE | | Allocate space in which to move the | 
| | | [List form of the PUTLINE and PUTGET | 
| | | |macro instructions. (32 Bytes) | 
| | | | | 
| 612 264 | PUTLINE | 4 |Zeroes (0) (set control and output | 
| | | |fields). | 
| | | . . | 
| 616 263 [=== SS5 } 4 |Zeroes (0) (will contain address of | 
| | | [output line). | 
| | | | | 
{620 260 || -===-5= {| 4 }Zeroes (0) (will contain address of | 
| | | | formatted output). | 
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[oe eS os eas Se Se Se fo Seer ee ee ee ee Se ee ee Se 1 
| Displacement|Field |Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
ae Oa et aR | 
[624 270 | PUTGET | 4 |Zeroes (0) (set control and output | 
| | | |fields). | 
| | | | | 
1628 274 [------- | 4 }Zeroes (0) (will contain address of | 
{ | | joutput). | 
| | | | 
| 632 L1G. LSS ss } 4 {xX'O00008000° (set control and output | 
| | | {\field). | 
| | | | | — | 
| 636 PE } 4 |Zeroes (0) (will contain input buffer | 
| | | j address). | 
| | | | 
}640 280 | | [Aligned on doubleword boundary for | 
| | | | FREEMAIN. [ 
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PARSE RECURSIVE WORKSPACE (RWORK) 


Size; 25 bytes. 
Constructed by: Parse. 
Located in: Subpool 0. 
Updated by: Parse. 
Used by: Parse. 
Contents: Internal work areas and pointers. 
fae a 
| Operation| 
[Diagrams | 
L 16 
faa er ee tos <r Poe De ee ee a en 
| Displacement]| Field |Size in| | 
| Dec. Hex. |Name [Bytes | Contents | 
|------------}~--------- +------- }-----~-------~------------------------ ! 
{0 0 | RPCEAD | 4 |t IKJSUBF PCE. | 
| | | | | 
[4 4 | RBAS ESV ; 4 j¢ previous recursive workspace. | 
| | | [| 
[8 8 | RXPCESV { 4 [t resume PCE. | 
| | | | | 
{12 Cc | RLINKSV | 4 |Return address from RECURSE routine. | 
| | | | | 
}16 10 |RKEYSV | 4 |¢ first IKJKEYWD PCE. | 
| | ! | | 
[20 14 |RLINKSV1 | 4&4 |Return address from erase mode. [ 
| | | } | 
J 24 18 |RFLAGS | 1 | Flags set as follows: | 
| | | | 
{ |RFKYPRSE | |X°80° - keywords have been scanned | 
| | | Jonce. | 
| | | | 
| | RFODSNM | |1Xx°4O* - a quoted data set name is | 
[ | | | being processed. | 
| | | | 
{ | RFERAS E | |x°20° - a PDE is being erased. | 
| | | | 
| | RFPRES | |X°10° - a keyword PCE was found in the| 
| | | | PCL. | 
| | | . | 
| |RFKEYWDS | }X°O8" - the next recursive processing| 
| | [ [will be for a keyword. | 
| | | | 
| | RFMEMB | {X"O4" - a member name is being | 
! | | processed. : 
| | RFNOTQ1 | |x"°O02' - the first qualifier is not { 
| { | | being processed. | 
| | | | | 
[ |RFNOSKIP | {|X'O01" - blanks should not be skipped. | 
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SYNTAX CHECKING MASK AREA 


Size: 20 bytes. 

Located in: Subpool 1. 

Created by: IKJEFPOO creates all five words of masks. 
IKEJEP30 creates (and uses) only the first four 
words. 

Used by: GENSCAN in IKJEFP20. 

Contents: Masks used to control the syntax checking of 


command name and parameters. 


eS 1 
| 


Operation | 
|Diagrams | 
|--------- { 
| 17 | 
foes : Rasa lad ae : aren Gis a a a Sa aa ee Ras Sse { 
Displacement |Field {Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
}------------}---------- }-------}-----------------------------=-------- 
}0 0 | DSNCNTL | 4 {A word of one-byte masks, as follows: | 
| | | | 
| |MEMBCNTL | [x'40° - asterisk not allowed. | 
| | { |X°01" - first character must be i 
| | | |alphabetic. | 
[ | | |X°03° - other characters must be | 
| ] | |alphameric.— —— ; 
| | | |xX°O8" - maximum permissible dsname or | 
| J ( jmembername length. | 
| | | | | ) 
}4 4 |PWSYNTAX | 4 {A word of one-byte masks, as follows: | 
| | | | 
| | | 1X'4O* - asterisk not allowed. | 
| | | |X'03" - first character must be | 
|. | | jalphameric. | 
| | | {}X*03° - other characters must be | 
| | | jalphameric. | 
| | { |x°08* — maximum permissible password | 
| | | | length. | 
| | | | 
|8 8 |USIDCNTL | 4 |A word of one-byte masks, as follows: | 
| | | 
| { j 1x'4GO* - asterisk not allowed. | 
| | |x*01" - first character must be | 
l | { |alphabetic. | 
[ | | |x*°03" - other characters must be | 
| | | |alphameric. | 
| | | {X"°07" - maximum permissible userid | 
| | | | length. | 
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irr ae : an Te eS re ee mT ee i ge 1 
| Displacement| Field |Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
}----~---~--- }---------- }-------}---~-------------------------=-------- { 
J12 C | DSTCNTL | 4 [A word of one-byte masks, as follows: | 
| | | {|X*CO* - asterisk is allowed. | 
[ - | | [X01 - first character must be | 
| | | | alphabetic. | 
| | | {[X*03" - other characters must be | 
[ | | | alphameric. | 
| | ] {X'O08" - maximum permissible DSTHING | 
| | | eer | 
{16 10 |KEYSNTX | 4 [A word of one-byte masks, as follows: | 
| | | |}X'4O* - asterisk not allowed. | 
| j { {X"°0O1" - first character must be | 
| | | |alphabetic. | 
[ | | |x°0O3° - other characters must be | 
[ | [ |alphameric. 7 | 
{ | | |X'1F" - maximum permissible length. | 
aes a a Bee Pee a ap ee pe ee Ee ee ee J 
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VALIDITY CHECK PARAMETER LIST 


Size: 
Constructed by: 
Located in: 
Updated by: 
Used by: 


Contents: 


ee te 
| Displacement|Field 

| Dec. Hex . | Name 
}------------4--—------- 
ae 0 | PDEADR 

| 

14 4 | USEWORD 

| | 

! | 

|8 8 | VALMSG 

| 
eee ee eee fea nee ae ee 


(VCF ARM) 


12 bytes. 


Parse. 

Subpool 
Command 
Command 


Address 
address 


1. 
processor. 
processor. 


of the PDE, address of user work area, 
of second-level message (set by 


validity check routine). 


62 1 
| Operation | 
|Diagrams | 
| 17 | 

y~-~------------------------ = 1—----—_-~ { 
[Size in| l 
|Bytes | Contents | 
+------- ~-------------------------------------- { 
} 4 |¢ PDE. l 
| | . | 
{ 4 [¢ user work area (seventh word in the | 
| | parse parameter list). | 
| | | 
{ 4 [¢ Second-level message (initialized to| 
| |X "FFOOQ0000° by parse). | 
y eee Pee ae SSeS ee eee ce J 
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Section 6: Diagnostic Aids 


This section contains the following information: 


e Messages (Figure 22) -- a list of messages issued by command scan 
and parse routines. 

e Register Usage (Figure 23) -- a summary of the use of general 
registers 0-15. 

e Return Codes (Figure 24) -- a summary of return codes and their 


meanings. unless otherwise specified, return codes are. contained in 
register 15. 


Other useful diagnostic information is contained in the parse 
permanent workspace (PWORD) and the parse recursive workspace (RWORK). 
Descriptions for these data areas are in Section 5. 


ae ra ea SCS Aa a a a Tos 1 
{Message ID|Message | Issued by | 

Fea ae aR REY Oe ce OER a ce Reg OE Ye EE RAD ER UE ee Oiler PE ee eres Sew nn CO ach Sera ee EEE 4 
|IKJ56700A |ENTER xxx | IKJEFP00 | 
}IKJ56701 |MISSING xxx + | IKJEFP00 | 
[IKJ56702I | INVALID, xxx, yyy | IKJEFP00 [ 
| I1KJ56708I | INVALID PASSWORD | IKJEFP0O 
|IKJ56709I | INVALID DATA SET NAME,yyy | IKJEFP00 | 
|IKJ56710I |INVALID USERID, yyy | IKJEFP00 | 
}IKJ567111I | INVALID ADDRESS, yyy | IKJEFPO0 [ 
[|IKJ56712I | INVALID KEYWORK, yyy | IKJEFP00 [ 
| IKJ56713I | INVALID VALUE, yyy ' | IKJEFPOO | 
|IKJ567151I | INVALID STRING, yyy | IKJEFP00 | 
| IKJ56704I |xxx AMBIGUOUS | IKJEFPO0 | 
|IKJ56714A | ENTER PASSWORD FOR xxx | IKJEFP00 l 
| IKJ56703A | REENTER | IKJEFPOO | 
|IKJ56706I |ENDING QUOTE ASSUMED, xxx | IKJEFP-00 | 
| IKJ567071I |RIGHT PARENTHESIS ASSUMED, xxx | IKJEFPO0 | 
{[IKJ56716I |EXTRANEOUS INFORMATION - IGNORED, xxx | IKJEF P00 | 
|IKJ56705 |MISSING PASSWORD FOR xxx | IKJEFP00 | 
{IKJ567171I |INVALID xxx | IKJEFPOO | 
eee Seer ee ee EN he sf 8h he i a eee eee J 


Figure 22. Messages: Command Scan and Parse Service Routines 
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9TC 


(IT eseeTeu ZSA) werborgq 1OATUOW TeUTUIaL 7ZSA/SO 


"€Z sanbry 


obesn rzaystbay 


S 981eq pue weossg puewwoy) 


SaUTANOY asdtara 


Register| Name Contents 


eeeaas Gaeeieiieee o 
0 RO | Wisk Paranal: register -~ 


must be zero, 


. i; Work/Parometer register -- 


must be one. 


a Work register, 


must be one. 


Work register. 


Contents Name Contents Nome Contents 
Work/Parameter register -= West paramatee register -- 
must be zero, RO must be zero, RO Work/Parameter reg ster, 
Work/Parameter register -- . Work/Parameter register -- 


must be one, RI Wor k/Parumeter register, 


Work register. R2 Base! register. 


ec OS ajc aa eee de fae So 


Base? register. 


aS res oar ari Siete 


XINPUT t Next character to scan, 


XINPUT f Parameter to be scanned, 


Last character scanned == used to 
compute length of scanned data. 


5 XINPUTB ret Last character scanned -- used to XINPUTB 
compute length of scanned data, 

6 XPCE | f Current PCE. | XPCE 
Additional base register for | 

7 | BASES | first CSECT, Re 

rt 
8 LINK2 Second level linkage register. LINK2 
—— 
9 LINK1 First level linkage register, LINK! 
10 BASE2 Base register for second CSECT. 


Mainline base register. 


Base register for current 
recursive workspace, 


Bose register for command 


workspace. WORKBASE 
ee es 


Return register. 


If called by Parse--points to current PCE, 
If called by command sean--not used. 


ce Not used, CBUFPTR | Command buffer, 
pee eee 


Not used, 


XINPUT { Next character to scan, | XINPUT | 


Pointer to next character to scan, 


ieneninennatn ielicetmeatad ak ek ot 
Last character scanned -~used to XINPUTB Pointer to last character scanned, 
compute length of scanned data. | ; 
Pointer to current parameter 
| xPCE | control entry ( PCE ) 
f Output area, R7 | Work register. 
eg Seay alin en ct RS Reds fone es ye 
Second level linkage register for 
2 ee 1 LINK2 Linkage register. 


linkage between subroutines. 


= 
First level linkage register for linkage | 


between mainline ond subroutines. 


LINK] 


= —=- ee 4 


Linkage register. 


| Command scan parameter list, R10. | = Work register. 


t 


nearer Lacey 
| PWAREG | 


Base register for command 
workspace. 


‘ ; 
Base register for Getmain 


Base register for common 


workspace --must be 13. 


Work register. 


Call register. 


Linkage register used as base 
register, 


Base register for command scan. , RID | 
_Cautomatic storage allocation) — 
; Gfocs lear dace emeers Vt Haka : eee og aslo eids 

Base register for command scan, R13 4 Work register. 

: | Linkage register ee IKJEFPOO- 
Seratch/call register, _ GOREG | PARSZENT and IK JEFP60-LINKRET) 

: : Reta ides for return to IK JPARS2 
Scratch/call register. | R15 ore etre ender Peer oh 


Return Code 
Routine Daewmel Meaning 


IK JEFPOO 00 Success, 


04 Unable to prompt, parameter missing, 
08 Processing interrupted by attention, 

Invalid parameters passed to parse by command processor, 
No space available for PDL, 
Validity check routine requested termination, 


Invalid parameters passed to the IKJTERM, IKJOPER, or IKJRSVWD macros, 


IK JEFP20 -~ Return codes are not used. The address returned to in the calling program is determined 
by the results of this program. 


IK JEFP30 


Success, 


The CSPL contains invalid parameters. (The output area and command buffer offset 
are unchanged, ) 


Figure 24. Return Codes: Command Scan and Parse Service Routines 
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Section 1: Introduction 


The dynamic allocation routines consist of the dynamic allocation 
interface routine (DAIR), the special TSO SVC 99 routines, and the DAIR 
error code analyser (DAIRFAIL). DAIR handles the allocation and freeing 
of data sets needed by the terminal monitor program, the TSO command 
processors, and other TSO problem programs. In general, DAIR obtains 
information about a data set and, if necessary, invokes the SVC 99 
routines to perform the requested operation. DAIRFAIL examines error 
return codes and issues appropriate informational messages when 
independently invoked to do so by a command processor. 


DAIR and the SVC 99 routines provide the services of: 


Obtaining the current status of a data set. 

Allocating a data set. 

Building and storing lists of data set attributes. 

Assigning attributes to data sets. 

Freeing a data set or attribute list. 

Concatenating data sets. 

Deconcatenating data sets. 

Updating the DCB and/or DSE blocks as necessary to conform with the 
change of status in allocation. 


Usually the data sets a terminal user will need are resident before 
he logs onto the system, and he has included dd statements in his logon 
procedure to reserve space for them in the Task Input/Output Table 
(TIOT). The user may, however, allocate data sets during a terminal 
session if the data set resides on a volume already mounted at the time 
of the request for allocation. 


As supplied with TSO, DAIR resides in SYS1.LINKLIB, and DAIRFAIL 
resides in SYS1.CMDLIB. The both execute in the user's foreground 
region with the protection key assigned to that region. SVC 99 resides 
in SYS1.SVCLIB. The installation may choose to make DAIR and DAIRFAIL 
resident in the TSO Link Pack Area (TSLPA) in the region assigned to the 
Time Sharing Control Task (TSCT). 


Specifying Data Sets at LOGON 


When the terminal user logs on to the system, the LOGON scheduler 
invokes the user LOGON procedure, which contains data definition (dd) 
Statements that define the data sets for use during the session. The 
job management routines read and interpret the user LOGON procedure and 
construct standard system control blocks, including the TIOT and the 
special data set extension (DSE) for TSO, as shown in Figure 25. 


The TIOT plays a central role in dynamic allocation. It contains 
allocation information that includes the relationship between ddnames 
and devices; it is an interface between the SVC 99 routines and job 
Management. 


The data set extension (DSE) is the TSO control block that includes 


the relationship between ddnames and dsnames; it therefore provides an 
interface between DAIR and the SVC 99 routines. 
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Sample LOGON Procedure Task Input/Output Table 
USERID 
USERID JOB 
7 USERPROC 
" USERPROC EXEC PGM=IK JEFTOO 
. UDERPROC 
“/STEPLIB DD DSN=D82JOB08,DISP=SHR 
STEPLIB. fuCcB 
DD DSN=PVTCMD ,DISP=OLD buce 
a DD DSN=SYS1,CMDLIB,DISP=SHR 
‘ADDI DD DYNAM 
/DD2 DD DYNAM 


“/SYSUTI DD DSN=8&8&SYSUTI,UNIT=2314, 
iF SPACE=(TRK, (10,5)) 
““HELPDD DD DSN=SYS1.HELP,DISP=SHR 


SYSUT] UCB 


HELPDD = #uCcB 


//DD3 DD DYNAM 
//DD4 DD DYNAM 


When the terminal user logs onto the system, the LOGON scheduler 
invokes the user logon procedure which contains DD statements that 
define the data sets to be used during the session. MVT job management 
routines read and interpret the user logon procedure and construct 
standard system control blocks including the Task Input/Output Table 
(TIOT), and the special Data Set Extension (DSE) for TSO, 


Figure 25. Specifying Data Sets at Logon 
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Data Set Extension 


STEPLIB:D82. JOBO8 


b:PVTCMD 


B:SYS1T.CMDLIB 


DD1:NULLFILE 


DD2:NULLFILE 


SYSUT1:&SYSUTI 


HELPDD:SYS1.HELP 


DD3:NULLFILE 


DD4:NULLFILE 


Section 2: Method of Operation 


This section describes the method of operation of the dynamic allocation 
routines, which include the dynamic allocation interface routine (DAIR) 
and the special TSO SVC 99 routines. DAIR handles the changes to 
allocation of data sets needed by TSO problem programs, including the 
terminal monitor program and the TSO command processors. The SVC 99 
routines provide the actual movements of data that effect these changes, 
which include allocating and freeing data sets, concatenating and 
deconatenating them, listaing and changing their attributes, and 
updating the DSE to reflect the changes made. 


Method of Operation Diagram 20 shows how the DAIR service routine 
obtains information about data sets and, if necessary, invokes the SVC 
99 routines to perform the requested service. 


Briefly, here is what happens: 


e When the terminal monitor program, a TSO command processor, or TSO 
problem program needs to use a data set, it links to DAIR and passes 
it the address of a DAIR parameter block. 


e The first two bytes of the DAIR parameter block contain an entry 
code that defines the service requested. (For example, DAIR entry 
code X*0008" is a request to allocate a data set by dsname.) 


e The DAIR control routine (DAIRCTRL) sets up the DAIR work area 
(DAIRWA) and branches and links to the appropriate DAIR subroutine. 
DAIR subroutine names are of the form DAIRnn, where nn is the entry 
code. 


e The DAIR subroutine performs the requested service. If this service 
requires one of the functions of SVC 99, the subroutine sets up a 
special entry code to denote which of the functions is necessary and 
invokes the SVC. Upon return from the SVC, the DAIR subroutine 
returns control to the calling program. 


The TIOT plays a central role in dynamic allocation. It contains 
allocation information that includes the relationship between ddnames 
and I/O devices; it is an interface between SVC 99 and job management. 


The DSE contains allocation information that includes the 
relationship between ddnames and dsnames; it provides information for 
correlation between DAIR and SVC 99. 


Met hod of Operation Diagram 20 shows the DSE, the task input/output 
table (TIOT), and other system control blocks. 


DAIR Service Routine 


The following discussions describe how DAIR provides an interface 
between the TSO problem programs that need functions of dynamic 
allocation, and the SVC 99 routines that provide them. As Figure 26 
shows, however, some requested DAIR functions do not require the 
execution of SVC 99. 
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ENTRY TO DAIR 


DAIR is invoked by a LINK macro instruction to entry point IKJEFDOO. At 
entry, register 1 points to the DAIR parameter list (DAPL). 


The DAIR Parameter List contains: 


The address of the user profile table (UPT). 

The address of the environment control table (ECT). 

The address of the calling program's event control block (DCB). 

The address of the protected step control block (PSCB). 

The address of the DAIR parameter block. DAIR parameter block names 
are of the form DAPBnn, where nn is the DAIR entry code. 


DAIR uses the second and fourth fields when initializing the DAIR work 
area (DAIRWA); the region control task (RCT) uses the first four fields 
during swap in and swap out. 


The DAIR parameter block is the major input to IKJDAIR. The first 
two bytes contain an entry code (for example X'0008') which defines the 
operation requested. The remaining bytes contain such things as the 
ddname for the data set, the dsname for the data set, and whether the 
userid must be prefixed to the dsname. 


SET UP AND INITIALIZATION 


At entry, DAIR issues the STAE macro instruction to provide for handling 
ABEND conditions through the DAIR STAE routine. Then DAIR gets main 
storage for the DAIR work area (DAIRWA) and initializes it, and gets the 
address of the DSE. 


DAIR then gets the DAIR parameter block and branches to the 
appropriate DAIR subroutine. 


PREFIXING USERID TO DSNAME 


If bit 2 of DAnnCTIRL is on, DAIR employs the USERID subroutine to prefix 
the userid to the specified dsname. The format of the dsname buffer is 
as follows: 


a ——————————— 
{ 

| Byte | Contents | 
i Rew etc. on duesk, ahing unc. SC 
| 0-1 { The length, in bytes, of the dsname. | 
{ | | 
| 2-45 { The dsname, left justified, -- the buffer is | 
| | only as long as necessary to contain the | 
| { dsname occupying it. | 
Ps oe BN as eS ee J 


The userid subroutine gets the userid from the DAIR work area and 
prefixes it to the dsname. 
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SEARCHING THE DSE CHAIN 


Usually, DAIR needs to get some kind of information about a data set. 
If so, it invokes the SEARCH subroutine to search the DSE chain for a 
specified dsname or ddname or for an available entry. The DSE contains 
the following information: 


The ddname. 
The dsname. 
The member name, for a partitioned data set. 
The condition of the data set, as follows: 
- Allocated dynamically. 
- In use. 
- A member of a partitioned data set. 
- Available for dynamic allocation. 
- Dynamically concatenated. 
- Permanently allocated. 
*« The status of the data set at the time of allocation (NEW, OLD, MOD, 
or SHR). 
e The normal and abnormal disposition for the data set. 
e The organization of the data set, as follows: 
- Indexed sequential (IS). 
- Physical sequential (PS). 
- Direct organization (DO). 
- Partitioned organization (PO). 
e The address of the TCB for the routine for which the data set is 
allocated. (Zero, if the data set was allocated during LOGON.) 


FUNCTIONS PERFORMED BY DAIR 


DAIR gets information from the DSE and, if necessary, invokes one of the 
Svc 99 routines to perform the requested operation. In general, the 
DAIR calling routine may specify data sets by either ddname or dsname. 
An entry code specifies the function requested, as shown in Figure 26. 


|x°00° |Searches the DSE for information about a data set by ddname or| 
| dsname. 
}X°04" |Searches the DSE for information about a data set by dsname. 
{ JIf not found, searches the system catalog. 
|X°O08°* |Allocates a data set by dsname. 
|x°O0C"* |Concatenates data sets by ddname. 
|xXx°10"* |Deconcatenates data sets by ddname. 
[x°14" |Searches the system catalog for all qualifiers for a dsname. 
[X°18"* |Frees a data set. 
}x'1C"* |Allocates a data set to a terminal. 
X*'24"* |Allocates a data set by ddname, or dsname if necessary. 
Y e e e 
[x*28° |Performs a list of operations indicated by other DAIR entry 
{ | codes. 
\x*'2C** |Marks DSE entries not available for the specified task. 
{X*30°* |Allocates a SYSOUT data set. 
|x°34°* |Builds and frees attribute lists (ATRCBs) and ATRCB chain. 


| 
| 
| 
| 
| 
| 
| 
- 
| 
| 
| 
{ 
| 
| 
| 
| 
1 
| 
| 
! 
| 
| 
| 
| 
| 
| 
{ 
! 
| 
| 
! 
! 
| 
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| 
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| 
| 
| 
! 
! 
| 
| 
| 
! 
| 
| 
| 
| 
| 
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! 
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l 
1 
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{|*Requires execution of some SVC 99 Routines 


ee ee ee 


Figure 26. Functions Performed by DAIR 
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SVC 99 Dynamic Allocation Routines 


DAIR invokes svc 99 to perform the following functions: 


Allocate data sets. 

Free data sets. 

Concatenate data sets. 

Deconcatenate data sets. 

Change the attributes of an allocated data set. 

Update the DSE. 

Build and maintain attribute lists (ATRCBs) and the ATRCB chains. 


In general, SVC 99 must have the ddname for the data set. DAIR makes it 
possible for the calling program to specify data sets by dsname rather 
than by ddname. An entry code specifies the function requested as shown 
in Figure 27. 


PE 
ntr 
[Entry | i 
{Code | Function Performed by SVC 99 | 
ht 2 ra 
}X‘'O00* | Update the data set extension (DSE). [ 
{x"01° | Define or allocate a data set by ddname. | 
{X°Q2° | Free a data set by ddname. | 
{X°O3"° | Concatenate a data set by ddname. | 
|x'O4¥* | Deconcatenate a data set by ddname. | 
|x'O5* | Clean up any outstanding DDRs in this task after ABEND, and | 
| return. | 
{x"06" | Change the attributes of a currently allocated data set. | 
|X°O7* | Build and free attribute lists (ATRCBs) and ATRCB chains. { 
bee ee ag ee a a a eg ae ee SF ee ed ee a J 
Figure 27. Functions Performed by SVC 99 


Svc 99 always receives control from DAIR at entry point IGC00099, the 
beginning of the allocation control routine. This routine performs a 
control routing function. It examines the entry code in the dynamic 
allocation parameter block from DAIR to determine the requested 
function, then performs initialization appropriate for the routines that 
process the request. Before transferring control to the processing 
routines, IGC00099 obtains and partially initializes main storage for 
the dynamic allocation work table (DAWT), a common work area for all the 
Svc 99 routines. See Section 5 for a description of the DAWT and how 
the Svc 99 routines use it, according to the function under execution. 


Figure 28 shows the method of operation diagrams for dynamic 
allocation and a legend for using then. 
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TABLE OF CONTENTS 


M.O, Diagram Diagram Title 


20 Dynamic Allocation Overview 
21 Allocating Data Sets 

22 Freeing Data Sets 

23 Converting Data Set Attributes 
24 Concatenating Data Sets 

25 Deconcatenating Data Sets 

26 Updating the DSE and DCB 

27 Building and Freeing ATRCBs 


28 Analyzing Dynamic Allocation 
Error Codes 


: : 


LEGEND 


Start using the diagram here. 


Control flow arrow. 


Data flow arrows. 


Reference the designated 
area, 


Pointers to, or reference to, 
Refer to the corresponding 


superscripts in the cross= 
reference tables, 


Figure 28. The Method of Operation Diagrams for Dynamic Allocation 
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ALLOCATING DATA SETS 


Method of Operation Diagram 21 shows how SVC 99 performs the steps of 
data set allocation and invokes the direct access device space 
Management (DADSM) routines -- SVC 32 -- to secure the secondary storage 
Space for the data set. The user requests this function through DAIk, 
which passes a parameter block that contains the ddname for the data set 
to be allocated, and the function code (X‘'01') to designate the 
requested function to the allocation control routine. 


Allocating a data set is the process of initializing a set of system 
control blocks to describe it according to user specifications, and 
securing space for it on direct access secondary storage. 


The principal descriptors for the data set reside in the job file 
control block (JFCB), so the dynamic allocation routines construct an 
entire new JFCB for it. 


The correlation between the da‘a set name (dsname) and the ddname of 
the data set is in the SIOT; the dynamic allocation routines provide 
this correlation appropriately. 


The place-holder for the data set in the task is the dd entry with 
the ddname and other appropriate information. The dd entry, and others 
like it for each data set, are the principal parts of the TIOT. 


Additional information about the TIOT and JFCB appears in the OS/VS2 
System Data Areas, SY28-0606. Additional information about the SIOT 
appears in the OS/VS2 Job Management Logic, SY28-0620. 


FREEING DATA SETS 


Method of Operation Diagram 22 shows how SVC 99 frees -- or unallocates 
~- data sets. The user requests this function through DAIR, which 
passes a parameter block that contains the ddnames for each data set to 
be freed, and the function code (X'02"') to designate the requested 
function to the allocation control routine. 


Freeing data sets is the process of releasing the operating system 
resources in use to maintain them; this includes disposing of the data 
sets according to a set of user-defined or default specifications. 


Releasing the resources is a general way of saying that the 
unallocation routines may (but do not in all cases have to) dequeue the 
data set from the system task, nullify or free a number of system 
control blocks as appropriate, and free the direct access storage space 
that the data set occupies. 


Disposing of the data sets means doing some discrete processing to 
free each data set in some specially defined way. For example, the 
disposition processing may direct the data set to SYSOUT for printing, 
or for storing on tape. 


In any event, when all those operating system facilities that 
constitute the resources in use by the data set become free, they are in 
turn available for use by other data sets. 


The system control blocks principally involved in freeing data sets 
are the same as those for allocating them: the JFCB, the SIOT, and the 
TIOT. Most of the processing of these control blocks occurs in the 
unallocate work area, a 584 byte area of main storage that does not 
appear on Method of Operation Diagram 22. The unallocation routines 
secure this area for various operations at the beginning of processing 
and release it at the end. 
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Additional information about the JFCB and the TIOT appears in the 
OS/VS2 System Data Areas, SY28-0606. Additional information about the 
SIOT appears in the OS/VS2 Job Management Logic, SY28-0620. 


CONVERTING DATA SEY ATTRIBUTES 


Method of Operation Diagram 23 shows how SVC 99 converts data set 
attributes. DAIR passes a parameter block that contains the ddname of 
the data set whose attributes need changing, and the function code 
(X'06') to designate the function to the allocation control routine. 


Converting data set attributes is the process of changing those 
fields that record the nature of a data set -- its characteristics, or 
attributes -- in the system control blocks. The system control blocks 
principally involved are the job file control piock (JFCB) and the step 
input/output table (SIOT). ddname changes in the SIOT, however, also 
require corresponding changes to the ddname in the TIOT associated with 
the same data set. 


Additional information about the JFCB and the TIOI appears in the 
OS/VS2 System Data Areas, S¥28-0606. Additional information about the 
SIOT appears in the OS/VS2 Job Management Logic, SY28-0620. 


CONCATENATING DATA SETS 


Method of Operation Diagram 24 shows how SVC 99 concatenates data sets. 
The user requests this function through DAIR, which passes a parameter 
block that contains the ddnames for each data set to be concatenated, 
and the function code (X‘'03") to designate the requested function to the 
allocation control routine. ; 


Concatenating data sets is the process of grouping them together 
relative to a single ddname. This grouping shows up internally as 
contiguous data definition (dd) entries in the TIOT, one entry for each 
data set. Only the first of these TIOT dd entries has a nonblank ddname 
field. The ddname in this field is the one, therefore, that identifies 
the concatenated group of data sets. 


To prepare the grouping of dd entries that results in concatenated 
data sets, the concatenation routines build a new TIOT, with the dd 
entries correctly rearranged, and move it over the old one. Then they 
update the chain of SIOTTTRs, if necessary, to re-order it so that the 
SIOTTTRS still correspond to the rearranged dd entries. If the 
concatenation results in the relocation of any TIOT dd entries for open 
data sets, data control block (DCB) updating is necessary; for this, one 
of the concatenation routines prepares a parameter list for the DCB 
update routine. 


Additional information about the TIOT appears in the OS/VS2 System 
Data Areas, SY28-0606. 


DECONCATENATING DATA SETS 


Method of Operation Diagram 25 shows how SVC 99 deconcatenates data 
sets. The user requests the function through DAIR, which passes a 
parameter block that contains the ddname for the concatenated group, and 
the function code (x"04') to designate the requested function to the 
allocation control routine. 
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Deconcatenating data sets is t 1e process of reassigning each data set 
in the concatenated group to its >wn unique ddname. This is done by 
retrieving the ddname from the re spective SIOT for the data set and 
replacing the name in the proper TIOT dd entry, which was previously 
blanked out to concatenate the data set. 


Additional information about the TIOT appears in the OS/VS2 System 
Data Areas, SY28-0606. Additional information about the SIOT appears in 


OS/VS2_ Job Management Logic, SY28-0620. 


UPDATING THE DSE AND DCB 


Method of Operation Diagram 26 shows how SVC 99 updates both the data 
set extension (DSE) and the data control block (DCB). 


Updating the DSE is the process of changing the information in it to 
conform with the most current status of allocation. Usually this 
updating occurs at the conclusion of some other operation in SVC 99, and 
the routines in the update function provide the normal common exit to 
DAIR from any of the other functions in the SVC. DAIR may, however, 
enter the update function directly (that is, through the allocation 
control routine -- IGC00099 -- only, rather than through another SVC 
function) to mark a data set as not in use; this happens every time any 
command processor returns control to the terminal monitor program, which 
in turn invokes DAIR for the function. 


Updating the DCB is a related, but separate operation that sometimes 
provides the entry into the update function from the concatenation 
function. It is necessary only when rearrangement of the TIOT dd 
entries for open data sets has taken place as a result of concatenating 
other data sets. It consists of making the TIOT dd entry offset 
information for any rearranged open data set coincide in its respective 
DCB with the new rearranged position of the entry in the TIOT. 


A full description of the DSE appears in “Section 5: Data Areas"; a 
full description of the DCB appears in the OS/VS2 System Data Areas, 
-SY28- 0606. 


MANAGING USER-SELECTED DATA SET ATTRIBUTES 


Method of Operation Diagram 27 shows how SVC 99 builds and maintains the 
lists of data set attributes that the user may select to override the 
default attributes provided by TSO. The user requests this function 
through DAIR, which passes a parameter block with data for the requested 
attribute management operation, and the function code (X'Q7") to 
designate the attribute management function to the allocation control 
routine. 


Assigning a data set its attribute is the process of defining a set 
of descriptors for it in portions of the job file control block (JFCB). 
Ordinarily, TSO provides a set of default descriptors for each data set 
allocated, so that the JFCB will be complete at allocation time. The 
Operating system refers to these descriptors to complete data control 
block (DCB) information that defines the data set attributes. 


When the TSO user enters his own choice of data attributes at the 
terminal, however, the ATTRIB command processor and DAIR format his 
choices into data that SVC 99 can process. This resultant DAIR 
attribute control block (DAIRACB) provides the information for SVC 99 to 
build its own attribute list (ATRCB) in the format of corresponding 
default attribute information in the JFCB. SVC 99 incorporates the 
ATRCB into a chain of ATRCBs for later use in allocating a data set (or 
data sets) with the listed attributes. 
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When the user allocates a data set with his previously listed choice 
of attributes, the ALLOCATE command processor invokes DAIR and SVC 99 to 
Overlay the TSO default attributes in the JFCB with the proper ATRCB 
from the chain. This separate operation makes the user attributes 
available to the operating system. 


Conversely, when the user attributes are no longer desirable, SVC 99 
unchains the ATKCB that lists them. This occurs when the user logs off, 
or when he uses the FREE command to abrogate his selection of attributes 
during a terminal session. The subpool storage made available by the 
unchaining operation is subsequently reusable. 


Additional information about the JFCB appears in OS/VS2 System Data 
Areas, SY28-0606. 


EXIT FROM SVC 99 AND FROM DAIR 


The Svc 99 routines return to DAIR using an EXIT macro instruction from 
the DSE update routines after successful execution of the requested 
dynamic allocation function. Upon encountering an error condition, 
however, any one of the SVC 99 routines immediately returns to DAIR via 
Svc 3 (the EXIT macro) with an appropriate return code in register 15 as 
shown in Figure 36. 


DAIR, in turn, returns to the calling program using a RETURN macro 
instruction and restoring all registers except 15. At exit, register 15 
contains the DAIR return code as described in Figure 35. DAIR uses this 
return procedure whether or not it invoked the dynamic allocation 
routines to perform the caller's request. 


CLEARING A DYNAMIC DEVICE REQUEST AFTER ABEND 


A dynamic device request (DDR) is an event that results from a user's 
request for dynamic data set allocation. It is represented in the 
operating system task by fields of control information in several system 
data areas. Three fields in particular may need clearing if a failure 
occurs during dynamic allocation, as follows: 


- TCB address for the current task. 

~ TJID address for the terminal job identifier related to the 
request. 

~ ECB address for the current DDR event. 


These fields are all address in the IORMSCOM system data area, which is 
addressed by the CVTDCBA field of the communication vector table (CVT). 


Clearing a DDR is an SVC 99 operation (function code X‘'05°) performed 
entirely by the allocation control routine (IGC00099). Since clearing a 
DDR is a function of DAIR ABEND processing, it is the DAIR STAE routine 
that invokes SVC 99, and it is the need for supervisory operations on 
system data areas that makes the use of the SVC mandatory. 


Clearing a DDR consists of the following phases, or operations in the 
Svc 939 allocation control routine. 


- Determining whether there is an outstanding DDR in the system. 

- Determining whether such a DDR is in the current task. 

- Clearing the three address fields related to the DDR. 

- Determining whether the DDR is in progress and, if so, posting it. 


To determine whether there is an outstanding DDR in the system, SVC 


99 checks the CVT CVTDDR field for nonzero contents. A number in CVTDDR 
means that there is a DDR outstanding in the systen. 
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TO determine subsequently whet! >r the outstanding DDR is in the 
current task, SVC 99 compares the :,LLOTJID field in IORMSCOM for 
equality with the TJID field in the JFCB. Equality indicates that the 
DDR is for the current task. 


To clear the three IORMSCOM address fields listed above, Svc 99 fills 
them with zeros. 


To determine whether the DDR is in progress, SVC 99 checks the 
DDRBUSY bit in IORMSCOM. The bit is on if the DDR is in progress, in 
which case SVC 99 turns on the DDRPOST bit in the zeroed-out ECB address 
field of IORMSCOM. 


When SVC 99 has cleared the IOKMSCOM address fields and posted the 
DDR-in-progress event (if necessary), it returns to the DAIR STAE 
routine which called it. The clearing of the outstanding DDR is at this 
time complete. 


DAIR Error Code Analyser 


The DAIR error code analyser (CIKJEFF18 -- DAIRFAIL) examines dynamic 
allocation and related catalog management failure codes and issues 
appropriate informational messages concerning them, when invoked by a 
command processor to do so. This processing provides the user, at his 
option, with meaningful diagnostic information about failures that occur 
GQuring functions of dynamic allocation. 


Method of Operation Diagram 27 shows how DAIRFAIL analyses errors and 
issues messages. Because DAIRFAIL can access the return codes that SVC 
99 or the catalog management routines supply to DAIR upon an error 
return, DAIRFAIL can determine the root of the failure in dynamic 
allocation. 


Briefly here is what happens: 


e When the user invokes DAIRFAIL through a command processor, DAIRFAIL 
receives a parameter list of pointers to -- 


The DAIR parameter list (and hence to the DAIR parameter block, 

which may contain a catalog management or SVC 99 return code). 

A word of storage containing the applicable DAIR return code. 

- A word of storage that contains either the address of the DAIRFAIL 
message writer or a direction to load it. 

- Two bytes of storage that identify the calling command processor. 


e DAIRFAIL exaimes the DAIR entry code to get the means for 
initializing and inserting such variables as ddname or dsname into 
the message text. 

e DAIRFAIL examines the applicable return code from DAIR, SVC 99, or 
the catalog management routines to select the proper informational 
message. 

e DAIRFAIL then prepares a parameter list that contains -- 


- The message identifier - 
- The variables for insertion into the message - 
- The address of the message control section - 


-~- and passes control to its message writer (IKJEFFO2) for 
completion and issuing of the message. 


e DAIRFAIL terminates by zeroing the standard return code register and 
returning to the calling command processor. 
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the same order as the 


corresponding DD statements 
in the user LOGON procedure. 


For a more detailed description of the TIOT, 
refer to the OS “VS? System Data Areas, 
528-0606. : 


HELPDD duce 
DD3 ) 
DD4 0 


DD2 0 
SYSUTI 4 Uce 


Thereafter, the top element 
represents the most recently 
allocated data set, while the 
bottom element represents the 
most recently freed data set. 
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CROSS REFERENCE TABLE FOR DAIR 


At entry, DAIR gets main storage for the DAIR Work Area (DAIRWA) and initializes it, gets the address of the DSE, gets a DAIR Parameter IK JEFDOO 
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Block (DAPBnn, where nn is the DAIR entry code) and branches and links to the corresponding DAIR subroutine, 


The DAIR entry code specifies the requested service as follows: 


Code Operation 

X'00' Search the DSE chain for a data set by DDNAME or DSNAME, IK JEFDOO 
X'04' Search the DSE chain for a data set by DSNAME;_ if not found, search the system catalog. IK JEFDOO 
X'08' Allocate a data set by DSNAME -- invoke SVC 99 DATASET function, IK JEFDOO 
X'0C ' Concatenate data sets by DONAME -= invoke SVC 99 CONCAT function, 1K JEFDOO 
X'10' Deconcatenate data sets by DDNAME -- invoke SVC 99 DECONCAT function, IK JEFDOO 
X'14' Search the system catalog for all qualifiers for a DSNAME, IK JEFDOO 
X'18' Free a data set -- invoke SVC 99 UNALLOC function. IK JEFDOO 
ya | ae Allocate a data set to the terminal -- invoke SVC 99 DATASET function. IK JEFDOO 
X'24' Allocate a data set by DDNAME (first) or DS NAME -- invoke SVC 99 DATASET function, IK JEFDOO 
X'28' Perform a list of operations indicated by other DAIR entry codes, 1K JEFDOO 
X'2C' Free DSE entries for the specified task -- invoke SVC 99 UPDATE function. IK JEFDOO 
X '30' Allocate a SYSOUT data set -- invoke SVC ?9 DATASET function, IK JEFDOO 
X'34!' Build and maintain attribute control blocks (ATRCBs), IK JEFDOO 


Returns to the calling program with return code in register 15. See Figure 37 for the return codes and their meanings.. 


At entry, SVC 99 gets control at entry point 1GC00099, the beginning of the allocation control routine, This routine gets main 
storage for and partially initializes the dynamic allocation work table (DAWT) and invokes the queue management routines to read 
the queve address (SIOTTTR) associated with the firsts DDNAME in the dynamic allocation parameter block. Also, by referring to 
the function code in the second two bytes of the parameter block, the routine determines which of the dynamic allocation functions 
will subsequently receive control, as follows: 


IKJEFDOO 


1GC00099 


Code Function Performed by SVC 99 

X'00' Update the Data Set Extension (DSE) 1GC25099 
X'O1' Define or allocate a data set by DDNAME, 1GC07099 
X'02' Free a data set by DDNAME, 1GC01099 
X'03' Concatenate a data set by DDNAME. 1GC18099 
X'04' Deconcatenate a data set by DDNAME. 1GC23099 
X'06' Change the attribute of a currently allocated data set. 1GC16099 
X'07' Perform attribute function, 1GC30099 


Returns to DAIR, Normally this return is from one of the update routines at the conclusion of processing for any specified function, 
In case of error, any routine in SVC 99 can return control with an error return code in register 15, See Figure 38 for these return 
codes, 
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1GC27099 
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e@ The input SIOTTTR (relative track address record) contains the pointer (TTR) to 
the SIOT containing the first user-supplied DDNAME in the dynamic allocation 
parameter block from DAIR. 

@ Preparing the DAWT includes inserting the parameter block address for use by the 
allocation routines, reading key information from the TIOT extension into DAWAI, 
ond reading the input SIOTTTR into DAWA2, 


@ The dynamic allocation parameter block contains the address and control information: 


necessary for the DATASET function to allocate a data set dynamically. Refer to 
‘Section 5: Data Areas” for a complete description of the parameter block contents, 


Validity checks include the following: 
e@ Name checking (NAMECK subroutine). 
e@ DDNAME] TIOT DD entry is -- 
- Awailable for dynamic allocation (a DYNAM entry ), 
- Associated with neither a concatenated dato group nor a multi-volume data set, 
DDNAME2, if specified -- valid characters and not already in TIOT. 
DSNAME, if specified -- proper length and valid characters. 
Membername, if specified -- valid characters. 
SYSOUT information, if specified -=- valid characters, 
No mutually exclusive parameters -- DSNAME, DUMMY, TERM, or SYSOUT 
appear alone, 
Moves key TIOT extension information from DAWA] to DAWTVARY; reads the SIOT 
that contains DDNAME1 into DAWA2., 


Initiolizes SIOT in DAWA2 by zeroing and blanking out some fields, loading others 

from the parameter block, and setting bits, as appropriate. Moves it into o specially 

obtained holding buffer to await movement to the job queue data set (SYS1.SYSJOBQE). 

@ Initializes JFCB in DAWA] similarly, 

e Processing for SYSOUT data sets -- Obtains storage for a SYSOUT work area, 
places its address in the DAWT, reads the SCT into DAWAI, obtains storage for 
an enqueve/dequeve parameter list, and issues an ENQ macro instruction for the 
WTPCB; assigns space in the job queue for a new SMB, a new DSB, and the JFCB 
and chains them into the message class output chain. 


Generating a temporary data set name -- Generates name in JFCB in DAWAI (entry 
from 1GC09099 ) or in the SYSOUT work orea ( entry from 1GCO7099); obtains storage 


for an enqueve/dequeve porometer list for the allocation/termination (Q4/Q5) resource 

and initializes it, 

Additional StOT and JFCB processing: 

e If DUMMY or TERM =TS is specified -- places a DSNAME of NULLFILE in the 
JFCB; turns on the DUMMY or TERM DSNAME bit in the VFLAGS field of 
DAWTVARY; sets the disposition bits in the SIOT and JFCB as specified in the 
input parameter block. 

e If the DSNAME is omitted or begins with "&" -~ turns on the VGENDS bit in 
VFLAGS to indicate that a DSNAME must be generated; turns on the STATUS = 
NEW bit in VFLAGS and sets a disposition of NEW, DELETE in both the JFCB 
and SJOT, 

e@ = If the data set is a SYSOUT data set ~- moves the generated DSNAME in the 
SYSOUT work area into the JFCB and frees the storage occupied by that work 
oreo; turns on the STATUS = NEW bit in VFLAGS, sets a disposition of NEW, 
DELETE in the SIOT, and a status of MOD in the JFCB, 

@ If the DSNAME is specified but does NOT begin with "&" == moves the name 
from the input parameter block into the JFCB; turns on STATUS = NEW bit in 
VFLAGS if disposition is NEW; issues LOCATE macro to get the volume serial 
number from the volume list block if disposition is not NEW and volume serial 
number not specified; turns on STATUS = NEW bit in VFLAGS if volume serial 
number cannot be found, 

@ If anattribuie jist name is specified, the ATRCB by that name is merged into 
the JFCB, 
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Label 


1GCO07099 


1GC0?099 


1GC08099 


1GC09099 


Key Description 


Saves the unit type field in the SIOT, places the SIOT in its buffer, transfers control 
to one of four routines, as follows: 
To |GC15099 if the DUMMY or TERM data set bit is on in VFLAGS, 
To 1|GC08099 if the VGENDS bit is on in VFLAGS -- DSNAME needs generating. 
To 1GC10099 if a DSNAME is specified in the input parameter block, 
To 1GC11099 in other cases with the VNOENQ bit turned on in VFLAGS to signal 
1GC11099 not to perform data set enqueue processing. 


Searches for a DSENQ table entry for this data set to see if it has already been 
enqueved; transfers contro! to 1|GC11099 if it finds a DSNAME entry with compatible 
use attributes, 


e@ Changes use attribute from shared to exclusive (RET=CHANGE option on ENQ 
macro ) if necessary for a currently enqueved data set; enqueues data set if there 
is no DSENQ table entry for it (see 1GC10099 module description in Section 3); 
builds ENQ/DEQ parameter list for allocation/termination (Q4/Q5) resource and 
passes it to 1|GC11099 for any further necessary enqueue processing. 


The device, or unit, information in the DEVTYP field of DAWTVARY is in one of 
three forms, processed accordingly, as follows: 
e Converts EBCDIC information -- 
- If the unit name is either generic or esoteric, searches the device name table 
(DNT) for the unit entry and saves it in DEVTYP, 
- If the unit name is a specific UCB, saves a pointer to it in the UCBP field of 
DAWTVARY and turns on the specific UCB flag (VSPFCUCB) in VFLAGS. 
@ Considers all direct access devices as eligible if unit not specified. 
e Performs no processing if unit information already is in device type form, 
Uses device mask table (DMT) and/or system UCBs to build a bit pattern that represents 
devices that may be eligible to satisfy the allocation request; turns on bit pattern 
construction flag (VBPCONST) in VFLAGS to indicate initialization of the pattern 
construction area (PCA == see Section 5) for the bit pattern, 


Uses specific UCB designation or PCA bit pattern to furnish device candidates for 
eligibility validation; performs a comprehensive series of checks on the device and the 
volume mounted on it to ensure that the allocation request can be satisfied; puts 
addresses of eligible candidates in UCBLIST (see Section 5) in DAWA2 and frees the 
PCA or DMT. 


Puts default space parameters in the JFCB; for a single candidate, issues direct access 
device spoce management (DADSM -- SVC 32) to allocate the necessary space on the 
volume; otherwise, builds and searches the candidate !ist for the best candidate and 
invokes I/O load balancing to select a candidate for allocation; puts the selected UCB 
(candidate) address in the UCBP field in DAWTVARY or returns error code if 

DADSM fails for all, 


Issues the message through the WTP facility. 


Writes the JFCB and SIOT to SYS1,SYSJOBQE and moves the DDNAME to the TIOT, 
updating the TIOT as necessary, if control is from |GCO09099, For other than a 
DUMMY or TERM request: places the volume serial number of the allocated device in 
the JFCB and writes the SIOT and JFCB to SYS1.SYSJOBQE; updates the UCB, issues 
a DEQ macro for the allocation/termination resource, frees the ENQ/DEQ parameter 
list, and issues any requested allocation message (see 7 above), 


Errors during dynamic allocation cause an immediate return to DAIR by SVC 3 with 
return code as shown in Figure 38, 
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CROSS~-REFERENCE TABLE FOR UNALLOC 
Key Description 


The input SIOTTTR (relative track address record) contains the pointer (TTR) to the SIOT containing the user supplied DDNAME in the dynamic allocation 
parameter block from DAIR. 


e Preparing the DAWT for freeing data sets includes inserting the parameter block address for use by the unallocation routines and initializing the pointers in 
DAWTVARY as shown on the diagram. See "Section 5: Data Areas" for a full description of DAWTVARY. 


Data Areas" for a description of the parameter block contents. 


e@ That the data set is not associated with multiple volumes or units. 

e@ = That the device involved is direct access. 

e = That the disposition is either valid or omitted, 

e@ That the DDNAME is associated with neither an open data set nor with a concatenated data group. 


For valid checks, secures the unallocate work area, initializes pointers into it, and reads the SIOT and JFCB into it; checks data sets other than DUMMY or terminal 


lists for the CATALOG and SCRATCH macros, and gets storage for and initializes an enqueve parameter list, if these operations and checks produce no errors. 


Checks operator and/or terminal requests for disposition messages and makes appropriate indications; prepares and writes disposition messages |EF283|, |EF285|, and 
|EF2871 as appropriate (see the OS/VS Message Library: OS/VS2 System Messages, GC38- 1002); if the message is to the operator or user, issues the WTO/WTP 
macro; if any terminals are to receive the message, searches the TJB chain and invokes the TPUT macro to issue the message, 


May also receive entries from SYSOUT processing routines (see 6 below): 


e Control from |GC05099 -- initializes the WTO buffer and the disposition message SYSOUT. 
e Control from |GC04099 -= initializes the WTO buffer and scratches the data set, 


4 Decrements the user count; cleans up the UCB so that it no longer appears allocated, if last user. 


e For terminal or DUMMY data sets -= turns off the terminal bit in the SIOT and TIOT; zeros out the UCB address part of the SCTUTYPE field of the SIOT; turns 
on the DYNAM bits in the SIOT and TIOT; turns off the DUMMY bit in the SIOT; puts "NULLFILE" in the DSNAME field of the JFCB; writes the SIOT and 
JFCB to the job queue; frees the storage for the unallocate work area; passes control to |GC25099 for DSE updating, 


e@ For SYSOUT data sets -- zeros out the SIOT DSB pointer and turns off the SYSOUT bit; if the data set is to be enqueved for the output writer task immediately 
(that is, when its disposition is not DELETE), rather than waiting for the completion of LOGOFF, continues processing as though the data set were DUMMY; 
in this case, zeros out the UCB pointer in the TIOT. 


e@ For other data sets -- issues an EN@ macro for termination resources and decrements the user count; if the user count is zero, frees the device by turning off the 
allocated bit in its UCB; turns off the nonsharable and data management count bits; if the volume is private, not permanently resident, or reserved, and if it 
does not have retain-specified or passed data sets, passes control to |GC06099 for KEEP message processing. 


Issues a DEQ macro for the termination resource; searches the DSENQ table records for the DSNAME if the data set is neither SYSOUT nor temporary; deletes name 
from table and dequeues it by using the POST macro against the ECB for the initiator (which in turn issues the DEQ macro against the DSNAME); issues the WAIT 


as though for a DUMMY data set (see 4 above), 


For SYSOUT dispositions other than DELETE, checks validity of job name and SYSOUT class; obtains storage for the JCF if the disposition is not DELETE and for the 
SCT if the DSB is in the message class, and reads the tables into storage; if the disposition is not DELETE, invokes the transient queue management routines to assign 
records for the DSB and JFCB associated with the data set; if the data set is to be enqueved for a SYSOUT writer (that is, when the disposition is not DELETE), passes 
control to 1GC05099; for cases where the DSB is in the message class, writes the SCT to the job queve and frees the SCT storage; transfers control to |GC02099, 
which deletes the data set, 

Initializes a DSB using information from the SIOT, TIOT and input parameter block; for SMF, places appropriate SMF information from the JMR into the DSB; writes 
the DSB and JFCB to the job queue using the records assigned by 1GC04099; if the DSB is in the message class, writes the SCT to the job queue and frees the JCT and 
SCT storage; invokes the transient queue management routines to enqueue the data set on the proper output class; transfers control -- to |GC02099 to issue the 
disposition message if MSGLEVEL=1, to !'GC03099 otherwise, 


@ The dynamic allocation parameter block contains the address and control information necessary for the UNALLOC function to free a data set, Refer to “Section 5: 


2 Returns to DAIR as soon as the reading of the input SIOTTTR is complete if the data set is already frees otherwise, checks the contents of the parameter block as follows: 


to ensure that they are not part of a generation data group, and are not passed, suballocated, or shared, with a disposition of DELETE; initializes parameter and volume 


macro for the dequeuing operation to complete, Frees the storage occuped by the ENQ parameter list, zeros out the UCB pointer in the TIOT, and continues processing 


Cc 


Routine Label _| 


|GC00099 


IGC01099 
1GC02099 


Allocation 
Control Routine 


Validity Checking 
Routine 


Disposition 
Processing Routine 


Device Freeing 1GC03099 
Routine 
Device Freeing |GC03099 


Routine 


SYSOUT Chain 
DSB Processing 
Routine 


|GC04099 


SYSOUT Data 
Set Enqueving 
Routine 


|GC05099 


7 Normally, transfers control to |GC25099 for DSE updating; however, errors cause a return to DAIR via SVC 3 with a return code as shown in Figure 38, — 
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CROSS-REFERENCE TABLE FOR CONVERT 


1 © = The input SIOTTTR (relative track address record) contains the pointer (TTR) to the SIOT containing the first user-supplied DDNAME in the Allocation 1|GC00099 
dynamic allocation parameter block from DAIR, See the description for the parameter block below. Control Routine 


e Preparing the DAWT for attribute conversion includes inserting the parameter block address for use by the conversion routines. 


e@ The dynamic allocation parameter block contains address and control information for the CONVERT function, It includes: 


- DDNAME}! -- the DDNAME currently associated with the unopened data set whose attribute needs changing, 
- DDNAME? -- the new DDNAME to be associated with the data set if, for example, DAIR has specified the exchange option, 
~ MEMBERNAME -- the member name associated with the data set if it is part of a partitioned data set. 


Checking the validity ensures that: Validity IGC16099 
DDNAMEI data set is currently closed. 


DDNAME2, if specified, contains no invalid characters, is in the TIOT if the EXCHANGE option was selected, or, that is not in the TIOT 
if the exchange option was not selected. 


Checking Routine 


Membername, if specified, contains no ‘awalia characters, An internal subroutine performs the name checking. NAMECK 

Saves the SIOTTR associated with DDNAME] in the TTRSIOT! field of DAWTVARY for later use in finding the SIOT to be updated; saves DDNAME2 Validity 1GC 16099 
SIOTTTR in TTRSIOT2 field in DAWTVARY for use in processing the EXCHANGE option, if specified -~- this SIOTTTR for DDNAMEZ2 points to the Checking Routine 
SIOT for DDNAME?2 and can come from either the same or a different blocked SIOTTTR record as the DDNAME] SIOTTTR. 
Posts an event control block so that the initiator will try to enqueue the data set for exclusive use, if the user requests this; for a successful enqueue, Validity 1GC 16099 
updates the use attribute in tne date set enqueve (DSENQ ) table entry for this data set to show its change in status. Checking Routine 

5 Necessary for changes to the status or member name: if its DCB-related fields are to be cleared, turns on the bit to prevent forward merge and makes SIOT and JFCB 1GC17099 
its blocksize field equal to the blocksize parameter passed in the dynamic allocation parameter block, Merges ATRCB, if specified, into JFCB. Updating Routine 

6 Necessary for changes to the status, disposition, or DDNAME. (Updating two dlOTs is necessary to process the EXCHANGE ootion.) For warmstart | SLOT and JFCB IGC17099 
processing, places the UCB address in the low-order two bytes of the SCTUTYPE field. This UCB is the one associated with the data set involved in Updating Routine | 


the attribute conversion request, 


Necessary if the updating of the SIOT included a aes of DDNAME; updates the DDNAME in the TIOT DD entry that corresponds to the same SIOT and JFCB 1GC 17099 
data set whose SIOT DDNAME entry was updated (see 6 above). Updating Routine 


Invokes the queue management routines to write the updated records to the SYS1,SYSJOBQE data set, SIOT and JFCB 1GC17099 
Updating Routine 


9 Normally, passes contro! to 1|GC25099 for DSE updating; errors during processing cause an immediate return to DAIR by SVC 3 with a return code SIOT and JFCB 1GC17099 
as shown in Figure 38. Updating Routine 


Method of Operation Diagram 23. Converting Data Set Attributes (Part 2 of 2) 
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Method of Operation Diagram 24. 
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CROSS - REFERENCE FOR CONCAT 


Key Description | Routine | Label 


1 e@ = The input SIOTTTR (relative track address record) is associated with the SIOT containing the first user-supplied DDNAME in the dynamic |GC00099 


allocation parameter block from DAIR, See the description for the parameter block below. 
1GC 18099 
1GC 18099 


4 CATTAB correlates the building of the new TIOT with the possible need to update the SIOTTTR chain to reflect the new concatenation order, TIOT Building Routine 1GC19099 
and to prepare for updating a data contro! block, if necessary. It contains a twelve-byte entry, as illustrated, for each entry in CATLST 
(and hence for each TIOT DD entry and each data set). Fields are as follows: 
e ENTHND --A flag turned on to show that movement of the associated CATLST entry to the new TIOT is complete. 
e OLDISP and NEWDISP -- Addresses of the associated DD entry in the old and new TIOTs, respectively; emplacing these addresses occurs 
during movement of the CATLST entry for this data set; inequality between them indicates (see 5 and 6 below) that SIOTTTR rearrangement 


Allocation Control 
Routine 


@ Preparing the DAWT for concatenation includes inserting the parameter block address for use by the concatenation routines, 


The dynamic allocation porameter block includes an eight-byte DDNAME for every DD statement that refers to a data set to be concatenated, 


2 CATLIST Construction 


Routine 


CATLST is obtained to contain the addresses of the TIOT entries corresponding to the input DDNAMEs in the parameter block, These addresses 
provide access to the appropriate SIOTTTR (see 6 below). Uses each DDNAME to locate the proper old TIOT entry; moves the entry address 
to CATLST in the requested concatenation order, 


CATLST Construction and 
TIOT Building Routines 


3 ‘The contents of the addresses in CATLST become the first entries in the new TIOT; the N field in DAWTVARY records the number of these new 
entries; moves these entries in conjunction with the use of CATTAB, as described in 4 below, 


is necessary to reflect the concatenation order in the new TIOT. 

@ NEWPOS -- Position of the data set in the new TIOT. 

e@ DCBUP -- Turned on when the dato set associated with this entry is open and the OLDiSP and NEWDISP fields are unequal; signals that 
preparation of a DCB update parameter list is necessary for the data set; OPENNUMB in DAWTVARY is incremented for each such data 
set marked. 

During the initialization of CATTAB, its location is recorded in the PCAT pointer in DAWTVARY. The routine moves the CATLST entries into 


the new TIOT; marks NEWPOS in each associated CATTAB entry; each of the DD entries is rounded out by using the address and control 
information in CATTAB to move the remainder of the DD entries to the new TIOT. 


5 sInvokes transient queue management routines to read in SIOTTTRs for necessary rearrangement, as indicated by unequal OLDISP and NEWDISP TIOT Building Routine 


fields in the corresponding CATTAB entry (see 4 above). 


IGC19099 


1GC20099 


7 Spreads the array to decompress it and moves the SIOTTTR headers back in; invokes the transient queue management routines to read the records TIOT Moving Routine 1GC20099 
back to the job queue (SYS1.SYSJOBQE data set), 
8 Moving the new TIOT over the old one completes concatenation. ae aa 


9 TIOT Moving Routine 


(Each SIOTTTR contains the TTR for a single SIOT; each SIOT is related by DDNAME to a specific TIOT DD entry, and therefore to the 
corresponding data set and CATTAB entry; hence, each TTR available via the read-in relates directly to a specific data set in the concatenated 
group and must therefore reflect the order within the group.) Provides an array of TTRs that can easily be accessed, indexed, and rearranged, 
excerpting the SLOTTTR headers and compressing the residual TTRs into contiguous storage; rearranges the TTRs to reflect the concatenation order. 


TIOT Moving Routine 


6 


1GC20099 


TIOT Moving Routine 1GC20099 


Rearrangement of any open dota set DD entries in the TIOT during concatenation requires the construction of a parameter list for the DCB update 
routine; the open dato sets are earmarked by the DCBUP flag turned on in CATTAB entries during processing of their CATLST entries (see 4 
above ) and by their respective unequal OLDISP and NEWDISP entries; preparation of the list is as illustrated, with the old and new TIOT 
entry offsets taken respectively from the OLDISP and NEWDISP fields in the appropriate CATTAB entry. 


10 Normally, posses control to |GC25099 for DSE updating (via the DCB update routine, 1GC35099, if the concatenation moved the TIOT DD 
entries for open data sets); errors during processing cause an immediate return to DAIR by SVC 3 with a return code as shown in Figure 38, 


Method of Operation Diagram 24. Concatenating Data Sets (Part 2 of 2) 
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Method of Operation Diagram 25. 


PROCESSING RESULT 


Performs the User-Requested Deconcatenation of Data Sets by DDNAME, 


1 Set Up and Initialize -- DAWT and SIOTTTR. 


2 Input DDNAME and SIOTTTR Relate to an Open Data Set -- 


No Yes 
Error Exit (See 6 Below) 


3 seRead In All the SIOTTTRs. 


SIOTTTR Table 
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4 Compress the SIOTTTRs, 


TIOT 


5s Process the DD Entries for Deconcatenation. 
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C) Check for Duplicate DDNAMEs on TIOT. DDNAME 
D) Prepare List of DDNAMEs, 
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CROSS-REFERENCE TABLE FOR DECONCAT 


Key Description Routine 


The input SIOTTTR (relative track address record) is associated with the SIOT containing the user-supplied DDNAME (see 2 below) in the Allocation 1GC00099 
dynamic allocation parameter block from DAIR. Control Routine 


Preparing the DAWT for deconatenation includes inserting the parameter block address and the TIOT entry address associated with the 
input DDNAME, 

The TIOTP and TIOTNO fields in DAWT relate to the input DONAME as follows -- 

- TIOTP--TIOT address for the entry containing the DDNAME of the concatenated group of data sets. 


- TIOTNO -=Denotes the SIOTTR position for the SIOT containing the input DDNAME; this SIOT is associated with the TIOT DD entry that 
contains the same DDNAME; the SIOTTTR position is where the TTR for the SIOT resides in a table of SIOTTTRs. 


This DDNAME is associated with the group of concatenated data sets that the user wishes to deconcatenate; it occupies the first TIOT DD Deconcatenation | 1GC23099 


entry for all the data sets in the group; the DDNAME fields in the DD entries for the succeeding data sets in the group are blank, At the Routine 
end of processing, there is a separate, named DD entry for each data set; this new structure relates each data set to a single DD entry, 
thereby providing the requested deconcatenation. 


The input SIOTTTR points to the SIOT associated with the input DDNAME (that is, with the first of the data sets in the concatenated group). 
The data set associated with this SIOT must not be open because allocation changes to open data sets can cause errors -=checks each new 
entry during processing ( via the reading of the SIOTs ~=see 5 below) to make sure it is not open. 


Invokes the queue management routines to read in the SIOTTTRs after getting the main storage to contain them, 


Compresses the SIOTTTRs by excerpting their headers and squeezing the remaining TTRs together into contiguous space -= results in a single table 
of TTRs that can be easily indexed by using the incrementable value in TIOTNO. 


5 —Deconcatenation consists of putting DDNAMEs from the SIOT into their respective blank DD entries in the TIOT, Processing for each DD Deconcatenation | 1GC23099 
entry includes: Routine 


a) Indexing the array of TTRs for the appropriate SIOT; TIOTNO provides the indexing factor for using the compressed TTR table to 
locate the SIOT, 


b) Reading the SIOT for the DDNAME it contains; a particular SIOT correlates with each DD entry in the TIOT and provides the DDNAME 
that deconcatenates the entry from the group. 


c) Checking to see that the SIOT DDNAME is not the same as one already in the TIOT (duplicate DDNAMEs in the TIOT is an error situation), 


d) Preparing a list of DDNAMEs valid for movement into the DD entries. This processing constitutes a loop in which one circuit processes 
one DD entry and its associated SIOT. Within this loop there is another small loop (see C above) to check the TIOT entries for a duplicate 
DDNAME, This possibility arises each time a SIOT turns up with a non-blank ODNAME; a duplicate DDNAME is invalid for entry into 
the list of DDNAMEs to be moved to the TIOT, The termination of the big loop is at either: 


e@ The next non-blank DD entry (the end of the concatenated group). 
e@ The end of the TIOT (a word of zeros). 


6 Normally, passes control to 1GC25099 for DSE updating; errors cause a return to DAIR by SVC 3 with a return code in register 15, 
as shown in Figure 38, 
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A A Se eR te 


9c 


(T aSeaTaAyN 7ZSA) werds0rig AOALUOW TeUuTWAZSL ZSA/SO 


INPUT 


From DAIR Via Function Code X'03' Via 
SVC 99 CONCAT Routines 
Function Codes: 


X'01' Via DATASET 


SIOTTTR Record X'02' Via UNALLOC 


; X'06' Via CONVERT 
4 SION! Function Code X'00’ 
UPDATE 
4 S!OT2 re 
4S10Tn 3 a 2 
DCB Update 
Porameter List 
Fram 1GC20099 in Concatenation —-ZaH F 
Baahaas Length of List 
1 Pair for Old TIOT Offset 
Each Data 
Set New TIOT Offset 
4 
4 
Register t I Jo) Os, 
ar 
“ 
Y / 
ve vil 
a ri 
| DSE Parameter List “ 
Points here” Function eos 
| when Function Codetol 
is "Mark DSE DSE ate — 
Not in Use” oes 4 
Allocation ~“— 
oan “Function Code for: ——_ = 
Points here when Dataset 
F ee UNALLOC 
umctton is an ONCAT 
Update Operation SEE Oe. 
or 
CONVERT 


Variable Work Area 
for DSE UPDATE 


Method of Operation Diagram 26. 


c 


PROCESSING RESULT 


Updates the Data Control Block, if Necessary, and 
Updates the Data Set Extension for the New Status in 
Allocation -- 


- OR - 
Marks the Data Set Extension "Not in Use", 
DCBTIOT 

Offset to DD 
Set Up and Initialize -- DAWT ond SIOTTTR, Entry in TIOT 
Updete THOT OD Entry eed 
Offsets in DCB. 
Perform Initial DSE Update Processing. —_ ee eck ine : 


DSE CHAIN 


Previous DSE Block 


Current DSE Block 


DSEFORWD 
4 Next DSE Block 
DSEBCKWD 4 Previous DSE Block : 


DSEBLESZ 21 Status VW fond , 
Length of DSE Block Bits 


g 
DEEBD NAM” -DONAME (astound inibeTiOl) 


Route Control: 


| 
— To 5 for Entry from -- DATASET (X'01') | 
CONVERT (X'06') | 
| 
| 
> 


— To & for Entry from -~ DECONCAT (X'04') 
CONTROL (X'‘00') 


— To 7 for Entry from -- CONCAT (X'03') 
UNALLOC (X'02') amy, 


DSETCBAD 4 Requestor's TCB 


DSETTRPW Password TTR : 


Normal '! Abnormal '! Data Set 
Disposition Disposition Organization 


DSEDSNAM DSNAME 


DSEMEMBR 8 
Member Name 


Perform DATASET or CONVERT 


Processing. 
~ OR - 


Perform DECONCAT or Allocation _ 
Contro! Routine Processing. 


= | 
Perform CONCAT or UNALLOC Sia fo iesaies steels 


Processing. 


Type 40 SMF Record 


Perform SMF Processing, if SSCS 
Necessary (Build Record), 


For a description of this 
record, refer to the publication 


rier scl Saal Facilities 
t = . 


Register 15 


Exit from SVC 99, 


No To DAIR Vig 
SVC 3 


Return 
SVC ys Parris. 


Yes 


Sars oy Return Code 


Updating the DCB and DSE (Part 1 of 2) 


c 


werbetq uotzerzado Jo pou AeNn 


Liz 


C | C 


CROSS REFERENCE TABLE FOR UPDATE 


The input SIOTTTR (relative track address record) contains the pointer (TTR) to the SIOT containing the first user-supplied DDNAME in the Allocation |GC00099 
dynamic allocation parameter block from DAIR. Control Routine 

e Preparing the DAWT includes inserting the parameter block address for use by the update routines and reading the input SIOTTTR (above) 3 
into DAWA2, 

e@ The dynamic allocation parameter block contains the address and control information necessary for the UPDATE function to perform the requested 
operations on the data set extension (DSE) for the user-specified data set. See "Section 5: Data Areas" for the complete description of the 
UPDATE (function code X'00') parameter block. 

@ When the function code is X'00', marking the DSE "not in use" is the only updating necessary. In this case = 
- Register 1 points to the DSE parameter list. 
- There is no dynamic allocation parameter block for any other function, 
- Control passes directly from DAIR through the allocation control routine to |GC25099 for updating. 

2 Optional operation performed when concatenation of data sets has resulted in rearrangement of TIOT DD entries for open data sets, DCB update DCB Update 1GC35099 


parameter list furnished by concatenation routines provides the old and new offsets into the TIOT for each such rearranged entry. DCB update routine | Routine 


uses old offset of each pair to find the proper DCB to update, then updates with the new offset, 


DSE Update 
Routine 


Determines which function passed control, 
e@ Searches the DSE chain for the input DDNAME(s) in the parameter block. 
e = Partially initializes a new DSE block for a newly allocated data set, if control is from the DATASET function; this includes - 


- Obtaining the space for it. 

- Calculating its size and annotating DSEBLKSZ accordingly. 

- Setting the DSEFORWD and DSEBCKWD chain pointers. 

- Moving in the DDNAME from DAWTVARY, 

- Setting the status and disposition fields from the DATASET parameter list. 


1GC25099 
Meving the DSNAME and its length from the parameter block to DSEDSLNG and DSEDSNAM fields, respectively. 


4 For a function code other than X‘00', control transfers to other routines in the UPDATE function as shown, DSE Update Routine} 1GC25099 


DATASET and 1GC26099 
CONVERT 
1GC27099 


Update Routine 
1GC29099 


5 Refer to the module operation description for |GC 26099 for an outline of this processing. sing. 


DECONCAT 
and Control 
Routine Update 


Routine 


6 Refer to the module operation description for 1|GC27099 for an outline of this processing. ssing. 


UNALLOC and 
CONCAT Update 
Routine 


SMF Exit Routine 1GC28099 


7 Refer to the module operation description for |GC29099 for an outline of this processing. ssing. 


8 Necessary only if SMF is active in the system; refer to the module operation description for |GC28099 for an outline of this processing, sing, 


7 The normal and error exits from the SVC 99 routines is to DAIR by the EXIT macro AOINEORS (SVC 3) at the conclusion of update processing. (Update routines) 1GC26099 
See Figure 38 for applicable return codes, 1GC27099 
1GC28099 


1GC29099 


Method of Operation Diagram 26. Updating the DCB and DSE (Part 2 of 2) 
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IK JEFFO2 -- Message Writer 


Register 15 
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RETURN 


CROSS - REFERENCE FOR DAIRFAIL 


A =~ Caller identification: 
(Hal fword) 


B -- Message writer address: 
(Fullword) 


ID =2 for the FREE Command Processor, 
ID = 1 for any other command processor. 


This field contains either the address of the message writer control section (IK JEFFO2) 
or the address of a word of zeros; if the word contains zeros, the message writer is 
not currently in main storage, and the DAIRFAIL analyser (IKJEFFI8) must load it, 
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CROSS - REFERENCE TABLE FOR DAIRFAIL 


The DAIR entry code indicates the function that produced the error return, for example, DAIRFAIL IK JEFF 18 
a failure in allocating a data set by dsname, Analyser 


The applicable return code may be one of three types, as follows: 


e@  DAIR return code -- indicates the DAIR function failure only; is meaningful only 
when DAIR does not invoke SVC 99 or the catalog management routines to perform 
the function, 


Dynamic allocation (SVC 99) return code -=- located in the DAxxDARC field of the 
applicable DAIR parameter block (DAPB) created initially for DAIR by the calling 
command processor. Each DAIR function has its own unique DAPB, whose field 
names are prefaced by DAxx, where xx is the entry code for that function: for 
example, DAO8DARC is the SVC 99 return code field for dynamic allocation of a 
data set by dsname, 


Catalog management return code -- located in the DAxxCTRC field of the applicable 
DAPB, The naming conventions for this field are similar to those for the DAxxDARC 
field (which immediately precedes it in the DAPB), as explained above. DAIR 
invokes catalog management after dynamic allocation functions that affect the 
cataloging of data sets. 


The return code indexes a table of message frameworks in the DAIRFAIL TSMSG control 
section, It also provides the means for selecting applicable information to insert in the- 
appropriate message framework. 


When the message is complete, the message writer issues it to the terminal by the DAIRFAIL IK JEFFO2 
PUTLINE service routine. The DAIRFAIL message identifications are IKJEFFxx, where Message 
xx is the specific message ID, Writer 


Before returning control to the calling command processor, DAIRFAIL zeros the DAIRFAIL IK JEFFI8 
standard return code register to show normal completion with no outstanding error Analyser 
return codes for the request. 
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Section 3: Program Organization 


This section describes the organization of the dynamic allocation 
interface routine (DAIR), the SVC 99 routines, and the DAIR error code 
analyser (DAIRFAIL). It contains information about the hierarchy of the 
load modules, the assembly modules, and the control sections that 
constitute each of these groups of routines. Figures 29, 30, and 31 are 
graphic representations of this hierarchy. 


The module operation information briefly describes the processing 
operations that occur within the individual routines in each group -- 
DAIR, SVC 99, and DAIRFAIL. 


For a summary of the functions of each DAIR subroutine, SVC 99 routine, 
and DAIRFAIL routine, refer to the Directory in Section 4&4. 
Program Hierarchy 


The DAIR service routine has only one load module, IKJEFD00, as shown in 
Figure 29. The load module includes the following major routines: 


DAIRCTRL - Initializes the DAIRWA, routes control to the appropriate 
DAIR routine. 

DAIROO - Searches the DSE chain for information about a data set. 

DATROY - Searches the DSE chain and system catalog, if necessary, 
for information about a data set. 

DAI RO8 - Allocates a data set by dsname. 

DAIROC - Concatenates data sets by ddname. 

DAIR10 - Deconcatenates asta seus by ddname. 

DAI R14 - Searches the system catalog for qualifiers for a dsname. 

DAI R18 - Frees a data set. 

DAIRic - Allocates a data set to a terminal. 

DAIR 24 - Allocates a data set by ddname or dsname. 

DAIR28 - Performs a list of operations. 

DAI R2C - Marks DSE entries not in use for the specified task. 

DAI R30 - Allocates a SYSOUT data set. 

DAIR34 - Builds and frees attribute lists (ATRC8sS) and ATRCB chain. 
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ATTRSRCH 


Searches the ATRCB chain for invalid duplicate 
attr-list-names. 


SEARCH - Searches the DSE Chain for information about a data set. 


GENDDN Generates a ddname of the form ‘SYSnnnnn‘, where nnnnn is 


a count in a TSO control block, the environment control 
table (ECT). 


USERID 


Prefixes userid to dsname. 


EXITCODE 


Routes control from one DAIR routine to another. Loads 
return code and returns control to calling program. 


Figure 30 shows the organizational interrelationship of the SVC 99 


routines, while Figure 33 shows their functional grouping and lists the 
common name for each. 


In response to requests for dynamic allocation, DAIR gets information 
from the DSE and, if necessary, issues SVC 99 to invoke dynamic 
allocation. DAIR uses register 1 to pass dynamic allocation the address 
of a parameter block that contains one of the dynamic allocation entry 
codes. This entry code tells the allocation control routine what the 
requested function is. The control routine, in turn, routes control to 
the routine appropriate for beginning the operations necessary to 
perform the requested function. Figure 32 illustrates this flow of 
control. 


Each routine constitutes a single load module of 1024 (1K) bytes or 
less, according to the conventions for Type 4 SVC routines. Because of 
this physical size limitation, each request for SVC function may require 
the loading of successive modular routines. The normal passage of 
control among the routines is via XCTL macro instruction, while error 
conditions encountered during execution result ina return to the caller 
via the EXIT macro instruction (SVC 3.) 


Figure 31 shows the hierarchy of the DAIR error code analyser 
(DAIRFAIL), which a user may invoke to get a diagnostic message related 
to a dynamic allocation failure. DAIRFAIL consists of the following 
routines: 

IKJEFF18 - the DAIRFAIL load module, which contains one CSECT 
(IKJEFF18) to control and execute the analysis of error 
return codes, and another CSECT (TSMSG) that contains the 
pertinent message segments for the construction of 
meaningful diagnostic messages. 


IKJEFFO2 - the DAIRFAIL message writer, which formats and issues the 
diagnostic messages under the control of IKJEFF18. 
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2 ee ee ES og ol 


DAIR DYNAMIC ALLOCATION 


IK JEFDOO 1GC00099 


DATASET 


DAIRCTRL 
DAIROO 
fl UNALLOC 
DAIRO4 
DAIRO8 Functional CONCAT 
Groups 
j Of 
Routines 
D AIROC 
i DECONCAT 
DAIR10 
I. 
a CONVERT 
Control | 
Sections DAIRI8 SVC 99 
i UPDATE 
DAIRIC 
DAIR24 
ATTRIB 
’ DAIR28 


SEARCH 


ATTRSRCH 


GENDDN 


USERID 


* Does not issue SVC 99, 


Figure 29. Program Hierarchy: Relationship between DAIR and the SVC 99 
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J 


DATASET FUNCTION 
CODE X'01' 


|\GC00099 
CONTROL ROUTINE 


J 1GC14099 


fe 


1GC08099 
fy 1GC06099 
IGCO 


(for allocating 
data sets) 


UNALLOC FUNCTION 
CODE X'02' 


Load Modules 


|GC07099 
5099 


(for freeing data sets) 


IGC02099 
IGC01099 


Load Modules 


CONCAT FUNCTION 


aie 1GC20099 
fect 
( for concatenating | 1GC 18099 
data sets) 
a | Load Modules 


DECONCAT FUNCTION | 1GC23099 


CODE X'04' 


( for deconcatenating 
data sets) 


Load Module 


CONVERT FUNCTION 
CODE X'06' 


1GC 16099 


(for changing data set 
attributes ) 


Load Modules 


f 1GC29099 
( for updating DCB and IGC28099 
DSE blocks) 

|GC26099 


UPDATE FUNCTION 
CODE X‘00' 


1GC25099 


Load Modules 


ATTRIB FUNCTION 
CODE X'07' 

(for building or freeing 

ATRCBs) 


1IGC30099 


Load Module 


S Figure 30. Program Hierarchy: SVC 99 Routines 
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IK JEFF 18 
DAIR Error Code Analyzer 
(Load Module ) 


IK JEFF 18 
DAIRFAIL CSECT 


IK JEFFO2 
DAIRFAIL Message Writer 
( Load Module CSECT) 


TSMSG 
Message CSFCT 


Approximate size, including IK JEFFO2 = 5.5K 


Figure 31. Program Hierarchy: DAIR Error Code Analyser 
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Entry Code from 
Coller 


From: Any Requestor of 
Dynamic Allocation 


IK JEFDOO 


Obtains Data Set 
Information and/or 
Invokes SVC 99, 

if Necessary 


Normal 


1, DAIR did not need 
to use SVC 99, 
2, After normal return 


from SVC 99, 


Error 


SVC 99 


1GC00099 


CONTROL 


Initialize and 
Determine 


Control Flow 


Entry Code from DAIR 


aaa 


IGC07099 


CONVERT 


Change Data Set 
Attributes 


DECONCAT 


Free Data Sets 


Deconcatenate 
Data Sets 


Build or Maintain 
ATRCBs i 


Allocate a 
Date Set 


© Updates the 
DSE Chains 


Return to the ' Error Return to 
Caller ‘ we /DOAE Caller Via 


EXIT SVC 


Figure 32. Flow of Control in Dynamic Allocation 
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la ne {=== oS Pe ae oe eee ee See 
| | | 

|Parent |Routine | 

| Function| Designation| Common Routine Name 

a \ a 
| CONTROL | IGC00099 |Allocation Control routine 

[ \ re 
| UNALLOC | IGC01099 |Validity checking routine 

| | IGC02099 |Disposition processing routine 

[ | IGC03099 |Device freeing routine 

| | IGCO4099 |SYSOUT chain DSB processing routine 

| | IGC05099 |SYSOUT enqueuing routine 

| | IGC06099 |KEEP message processing routine 

| | IGC21099 |TSO terminal KEEP message processing routine 
pee pesemeneene }------------~---------—-----------=------------ 
| DATASET | IGC07099 |Validation and initialization routine 

; | IGC08099 |SYSOUT proces ;iing routine 

| | IGC09099 |SIOT and JFCB processing routine 

f | I1GC10099 |Data set enqueuing routine 

| {| IGC11099 |DSENQ update and device name table load routine 
{ | 1GC12099 |Bit pattern construction routine 

f | IGC13099 |Device reduction routine 

{ | IGC14099 |Direct access device space management routine 

[ | 1GC15099 |TIOT and JFCB update routine 

| | == S+=>== J}I/O load balancing routines (in scheduler -- 

| | | IEFABxxx) 

| | 1GC31099 |TIOT open bit verification routine. 

ae aE a TT 
| CONVERT | IGC16099 |Validity checking routine 

{ | 1IGC17099 |SIOT and JFCB updating routine 

| - | 1GC31099 |TIOT open bit verification routine 

a Pa, Be ae 
{|CONCAT | 1GC18099 |Concatenation list construction routine 

| | 16C19099 |TIOT building routine 

| { IGC20099 |TIOT moving routine 

a | as 
| DECONCAT| IGC23099 |Deconcatenation routine 

t-------- }------—--- }----~--—--------------------------------------- 
| | | 

{UPDATE | IGC25099 |DSE update routine 

| | IGC26099 |DATASET and CONVERT update routine 

{ | IGC27099 |DECONCAT and control routine handling routine 

| | 1GC28099 |SMF Exit routine 

[ | IGC29099 |UNALLOC and CONCAT Update routine 

[ | 1GC31099 |TIOT open bit verification routine 

| | IGC35099 |DCB update routine 

a ee ae 
| ATTRIB I IGC30099 |Chain or unchain an attribute list (ATRCB). 

eee Sea eee ey) eae eee eer ee eee a ar ee ee ks 
Figure 33. Functional Grouping of the SVC 99 Routines 
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Module Operation 


The following descriptions briefly describe the processing operations in 
each executable module of DAIR and SVC 99. 


IKJEFDOO -- DAIR 


Obtain the status of a data set by searching the DSE Chain for the 
appropriate information and, if necessary, invoke the SVC 99 routines 
to perform the following functions: 


Allocate a data set. 

Free a data set. 

Concatenate a group of data sets. 

Deconcatenate a data set from a group of data sets. 
Convert a data set from one use to another. 

Update the information in the DSE chain. 

Build or free an attribute list. 


ATTRSRCH SUBROUTINE OF IKJEFDOO 


Calls the SEARCH routine to search the DSE chain for a ddname that 
Matches a specified name, if necessary. Searches the ATRCB chain for an 
attr-list-name that matches a specified name. 


GENDDN SUBROUTINE OF IKJEFDOO 

Generates a ddname of the form *"SYSnnnnn", where nnnnn is a count in the 
environment control table (ECT). 

SEARCH SUBROUTINE OF IKJEFDO0 

Searches the DSE chain for a specified ddname or a dsname. The search 
starts at the bottom of the chain or at the address specified in BLKPTR. 


The search ends at the top of the chain or at the first occurrence of 
the dsname if bit 9 of STATUS1 is set. 


USERID SUBROUTINE OF IKJEFDO0 


Prefixes the userid to a specified dsname. 


IGC00099 -- ALLOCATION CONTROL ROUTINE 


Creates the dynamic allocation work table (DAWT), performs 
initialization common to each function of the SVC, and exits to the 
function requested with the address of the DAWT in register 1. 


IGC01099 -- UNALLOC VALIDITY CHECKING ROUTINE 


Obtains space for an partially fills in the 584-byte unallocation work 
area. Gets a 28-byte work space for enqueuing the Q5 termination 
resources of the operating system, if necessary. Reads in the SIOT and 
the JFCB. Invokes IGC31099 if the TIOTOPEN bit is on for the current 
unallocation request; when IGC31099 returns control, continues normal 
processing if TIOTOPEN is off, or starts abnormal exit processing if the 
pit is on. 
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IGC02099 -- DISPOSITION PROCESSING ROUTINE 


Initializes the message and WTO buffers and makes appropriate change to 
the catalog for dispositions of CAIALOG, UNCATALOG, and DELETE. Issues 
disposition message IEF283I, IEF285I, and IEF287I1, as necessary. 


IGC03099 -- DEVICE FREEING ROUTINE 


Determines the type of data set being freed, then, appropriately, 
performs some combination of the following operations: 


e Modifies the appropriate bits and fields of the SIOT, TIOT, and JFCB 
to free the data set. 

e Enqueves the termination resource (Q5), modifies the UCB, and 
dequeuves the termination resouxces. 

e Updates the DSENQ (ampersand in the first character of the data set 
name for non system-generated data set names only. 

e Uses the transient queue manag:r to maintain YSY1.SYSJOBQE and to 
dequeue the dsname, as necessary. 

e Frees the unallocate work area and transfers control to the UPDATE 
function. 

e Monitors any of these operation for errors, frees all main storage 
devoted to work areas in error situations, and subsequently returns 
to the user with an error code via the EXIT SVC 3. 


IGC04099 -- SYSOUT CHAIN DSB PROCESSING ROUTINE 


Provides interim processing for SYSOUT data sets between initial 
validity check (1GC01099) and disposition processing for the data set 
(IGC02099). Processing includes validity checks of jobname and SYSOUT 
class, obtaining storage for and reading in the SCT and/or JCT, as 
appropriate for the disposition and message class, using the transient 
queue management routines to place a null SMB on SYS1.SYSJOBQE, and 
assigning two records from SYS1.SYSJOBQE when the disposition parameter 
is not DELETE. 


IGC05099 -- SYSOUT ENQUEUING ROUTINE 


Places a complete KEEP message (IEF280E) in the message buffer for 
direction to SYSOUT and the operator console only, and issue it; or 
partially constructs the TSO terminal KEEP message depending upon user 
requirements, for completion by 1GC21099. Clears fields in the UCB so 
that the volume may be demounted. 


IGC06099 -- KEEP MESSAGE PROCESSING ROUTINE 


Initializes a DSB using information from the SIOT, TIOIr, user parameter 
list, and SMF information from the JMR when SMF is active for the user's 
job. Writes the DSB and the JFCB using the records assigned in IGC0O4099 
to SYS1.SYSJOBQE and enqueues the data set on the proper output class by 
uSing the jobname from the parameter list, if available, or from the 
TIOT. 
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IGC07099 -- DATASET VALIDATION AND INITIALIZATION ROUTINE 


Checks the validity of the input to the function of allocating data 
sets. 


Contains the NAMECK subroutine, which validates the character strings 
used aS input as the table of allowable characters shows below: 


r a a a De ee ey ee ee | a a ca a 1 
[Position of the | | | | 
| Character | DSNAME |DDNAME MEMBERNAME PROGRAMNAME {SYSOUT Class | 

Pap Se aa Ee $f nn fn f 
|First Character |A - Zz | A - Z | A- 2 | 
| | & | a | @o-9 | 
| | # | $ | | 
| | §$ | l | 

== >—=-S => = $n nh nnn fn 
| Not JA -Z | A- Z@ | N/A [ 
|First Character ]0 - 9 | Oo - 9 | | 
| | - | @ | | 
| | a l # | | 
| | # | $ | [ 
| | $ l { l 
| | | [ 
| {12-0 | | 
| Jpunch | | [ 
Ce ae ot ey eer i ie ane ae era a an ae nC aaa lr fe eee area et ka J 


IGCO08099 -- SYSOUT PROCESSING ROUTINE 


Processes SYSOUT data sets, and generates a dsname whenever necessary 


IGCO09099 -- SIOT AND JFCB CONSTRUCTION ROUTINE 

Assigns a record for the JFCB, if necessary. Initializes the SIOT and 
saves it in the SIOT buffer. Initializes the JFCB from parameters in 
the parameter list or in an ATRCB. 

IGC10099 -- DATA SET ENQUBJING ROUTINE 

Searches the records of the DSENQ table to see if it si necessary to 
enqueue the data set name to the task. Performs one of the following 
operations based upon the results of the table search: 


e Dsname already appears on the table - 


- With exclusive use attribute -- ENQ is not necessary, and the 
subsequent exit is to 1I1GC11099. 


1) Request is for shared use -- ENO is not necessary, and the 
subsequent exit is to IGC11099. 
2) Request is for exclusive use -- Builds the dsname ENQ parameter 


list with the RFT=CHNGE option; passes control to IGC11099. 
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e Dsname not found -- builds E Q parameter list and performs the 
enqueue by posting an ECB (E B15 to start the initiator. Posting 
ECB1 includes passing the in tiator the address of the ENQ/DEQ 
parameter list. When posted by SVC 99, the initiator issues the 
enqueue macro instruction while SVC 99 waits. When the macro 
instruction returns control, the initiator posts an ECB (ECB2) with 
the macro return code. This code indicates to SVC 99 and the WAIT 
Macro instruction it issued whether or not enqueuing the data set 
was successful. This processing is called “the WAIT/POST mechanism 
with the initiator"; SVC 99 acts upon the results as follows: 


- Successful execution -- Adds a new dsname entry to the DSENY table 
and passes control to 1GC11099. 
- Error -- Returns control to the user by EXIT SVC 3. 


Also obtains and initializes main storage for the allocation/termination 
dequeue parameter list before pessing control to IGC11099. 


IGC11099 -- DSENQ UPDATE AND DE\ ICE NAME TABLE LOAD ROUTINE 


Writes the updated DSENQ record to the SYS1.JOBQE data set and performs 
any necessary chaining. lLoads the device name table to convert the unit 
name to a device type. Deletes the device name table and transfers 
control to IGC12099. 


IGC12099 -- BIT PATTERN CONSTRUCTION ROUTINE 


Loads the device mask table (DMT) and scans it for an entry with a 
device type that matches the one in the DAWT. Passed the address of the 
entry that it may find by the scan to IGC13099. Otherwise, deletes the 
DMT and obtains space for, initializes, and builds the bit pattern in 
the pattern construction area (PCA). (See Section 5 for a description 
of the PCA.) Passes the completed bit pattern to I1GC13099 if it finds 
any UCBs that meet the device type requirements for the request. 

Finding no suitable UCBs results in an error return. 


IGC13099 -- DEVICE REDUCTION ROUTINE 


Builds a list of UCBs (the I/0 load balancing candidate list) that can 
satisfy the request for allocation in -- 


- DAWA2 field of DAWTVARY, for 43 or fewer potentially eligible 
candidates. 
- Subpool 253 for more than 43 candidates. 


The candidates may be those represented by either - 


- The specific unit address passed by IGC11099 to indicate which IOS 
lookup table entries will yield potential candidates. 

- The bit pattern passed by IGC12099 to represent eligible 
candidates. 


IGC14099 -- DIRECT ACCESS DEVICE SPACE MANAGEMENT ROUTINE 


Invokes the scheduler I/O load balancing routines to optimize the I/0 
load with resvect to the UCB candidates for the current allocation 
request. (The load balancing routines read the candidate list received 
from IGC13099 and select the best candidate from it.) 
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Invokes DADSM by SVC 32 to allocate direct access space for the best 
device candidate, as determined by load balancing. If DADSM fails for 
the current candidate, invokes load balancing to select another 
candidate. This interaction between load balancing and DADSM continues 
until DADSM is successful, or until either the candidate list is 
exhausted or load balancing returns a code for WTO/WTP to indicate 
insufficient storage for load balancing to operate. 


With load balancing inoperative, invokes DADSM to allocate space 
directly from the candidate list. This process continues until DADSM is 
successful, or until the candidate list is exhausted, in which case, 
returns a code that reflects the first candidate for which DADSM was 
unsuccessful. This return code reaches the user through nectoe6 the 
exit routine from the DATASET function. 


IGC15099 -- TIOT AND JFCB UPDATE ROUTINE 


Upon entry from IGC09099 (DUMMY or TERM data sets): 


Writes the JFCB and TIOT to SYS1i.SYSJOBOE and moves the new ddname to 
the TIOT. Updates fields in the TIOT as follows -- 


e TIOTEDYNM = ‘0‘'B 

e TIOESTTA = ‘00‘x 

e TIOESTTB = ‘00‘'X 

e TIOESTTC = ‘00‘X 

e TIOSUSED = ‘0O*B 

e TIOEFSRT = ‘000000‘X 

e TIOTTERM = ‘'1'°B (if this is a terminal request) 


Passes control to IGC25099 by XCTL when TIOT updating is complete. 
Upon normal entry from 1GC13099 or IGC14099: 


For a request to change the enqueue use attribute from “share to 
"exclusive", enqueues the data set by using the WAIT/POST mechanism with 
the initiator. (See the description for this under “Operation® in the 
module description for IGC10099.) 


e Successful enqueue - 
- Reads the correct record of the DSENQ table. 
- Updates the dsname use attribute. 
- Writes the updated table to SYS1.SYSJOBOE. 


e Unsuccessful enqueue - error return to the user with return code 
X*20C°. 


Places the volume serial number of the allocated device into the JFCB, 
then writes the JFCB and SIOT to the SYS1.SYSJOBQE data set. Updates 
the UCB or subUCB, in the case of 2311 devices) as follows -- 


e Increments the user count (SRTEUSER/DCELUSER). 
e Sets the public volume attribute if it is not already set. 
e Turns on the “allocated" bit (SRTEALOC). 


Dequeues the allocation/termination resource (94 and 95) and frees the 
ENO/DEQ parameter list. Updates the TIOT as describes above except that 
it sets TIOEFSRT with the address of the correct UCB. Issues message 
IEF237I if allocation messages are requested and transfer control to 
IGC25099. 
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Upon entry from IGC13099 or I':C14099 for error processing: 
e If the data set name has been enqueued - 


- Dequeue the data set name using the WAIT/POST mechanism with the 
initiator. (See module description for IGC10099 -- initiator 
issues DEQ macro instruction rather than ENQ.) 

- Reads the last record of the DSENQ table and overlays the first 
byte of the dsname with an ampersand. 

- Writes the updates DSENQ record. 


e Frees the main storage obtained for the data set name enqueue 
parameter list, if any storage was obtained previously. 


e Dequeues the allocation/termination resources (Q4 and Q5) and frees 
the corresponding parameter list. 


e Frees the SIOT buffer and the DAWT. 


e Places the return code in register 15 and exits to the user. 


IGC16099 -- CONVERT VALIDITY CHECKING ROUTINE 


- Waits for the reading of the SIOTTTR initiated in IGC00099. 

- Checks the validity of ddnames and member names by using a 
subroutine. 

~ Saves the TTR of the SIOT for the first ddname (ddnamel from the 
TIOT extension) in the DAWTVARY portion of the DAWT. 

- Determines whether saving a second TTR is necessary. (This is the 
case when the user specifies the “exchange” option and the TTRs 
for the ddnamel1 and ddname2 SIOTs are not in the same TTR record.) 

- Saves either this second SIOTTTR or the SIOTTTR of the SIOT for 
ddname2 in DAWTVARY. 

- Change the.use attribute for the data set to "exclusive", if 
necessary, and updates the DSENQ table to reflect this change. 

- Invokes IGC31099 if the TIOTOPEN bit is on for the current 
attribute conversion request; when IGC31099 returns control, 
continues normal processing if TIOTOPEN is off, or starts abnormal 
exit processing if the bit is on. 


IGC17099 -- SIOT AND JFCB UPDATING ROUTINE 


Determines which control blcoks are necessary to satisfy the requests on 
the caller‘s parameter list, and obtains them. Updating the control 
blocks may include the following operations: 


JFCB - Changing the status of the member name. 


- Clearing the DCB-related fields -- This operation also involves 
turning on the bit that prevents a forward merge, and setting the 
blocksize to the user‘’s specifications. If the input parameter 
list contains the address of an ATRCB, the routine overlays the 
DCB parameters with the user‘s DCB parameter selections in the 
ATRCB. 


SIOT - Changing the status, disposition, or ddnane. 


- Placing the UCB address in the low-order two bytes of the unit - 
type field (SCTUTYPE). 


- Obtaining, and updating as above, a second SIOT - this one for the 


second ddname supplied via the user's selection of the “exchange” 
option. 
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TIOT - Changing the ddname(s) to agree with corresponding changes in the 
SIOT(s). 


Writes the updated records to SYS1.SYSJOBQE and transfers control to 
IGC25099. 


IGC18099 -- CONCATENTATION LIST CONSTRUCTION ROUTINE 


- Waits for the reading of the SIOTTTR initiated in OGC00099. 

- Gets space for and builds the concatenation list (CATLST), which 
consists of the addresses of the entries to be concatenated in the 
order that they are to be concatenated. 

- Determines the number of entries for, and the length of, the new 
TIOT. 

- Gets main storage for the TIOT and the concatenation table (CATTAB 
-- see Section 5) based on the numbers determined above. 

- Prepares CATTAB by recording the old addresses of each TIOT entry. 

- Begins constructing the new TIOT using the addresses of the 
entries from CATLST, and by turning on the “entry handled® flag 
(ENTHND) in CATTAB for each entry it processes. 

- Invokes 1GC31099 if the TIOTOPEN bit is on for the current 
concatenation request; when IGC31099 returns control, continues 
normal processing if TIOTOPEN is off, or starts abnormal exit 
processing if the bit is on. 


IGC19099 -- TIOT BUILDING ROUTINE 


- Examines each CATTAB entry and moves those not previously moved to 
the TIOT. 

- Turns on the DCBUP flag in the CATTAB entry if the data set 
associated with the corresponding TIOT entry is open. This 
indicates that updating the DCB for this data set may be necessary 
after its TIOT entry is moved. (See the description of operation 
for 1GC35099.) 

- Increments OPENNUMB in DAWTVARY each time it earmarks an open data 
set for updating to show the number of such data sets. 

- Checks the OLDISP and NEWDISP entries in CATTAB for any inequality 
when the new TIOT is complete. The inequalities, if there are 
any, reflect changes to the position of the entries in the new 
TIOT, if there are no changes, and transfers control to IGC25099. 

e Obtains main storage for and calls the transient queue manager to 
read in the SIOTTTRs, if any rearrangement of the entries has 
taken place. Then it transfers control to IGC20099. 


IGC20099 -- TIOT MOVING ROUTINE 


- Compresses the SIOTTTRs into a single array for indexing and 
rearranges them to reflect the new structure of the TIOT by using 
the old position (OLDPOS) and new position (NEWPOS) entries in the 
CATTAB. 

- Decompresses the SIOTTTRs, moves the header back, and writes them 
to the SYS1.SYSJOBQE data set. 

- Determines by examining the DCBUP bit whether updating the DCB is 
necessary (1GC19099 turned the bit on if updating may be 
necessary). 
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e Moves the new TIOT over he old one, frees main storage, and 
transfers control to IGC 5099 if the bit is off in all CATTAB 
entries. 

e Gets main storage for and prepares the DCB update parameter 
list, whose address it p.aces in register 1. Moves the new TIOT 
over the old one. Frees main storage (except for the DAWT and 
the update parameter list), places the address of the DAWT into 
register 0, and transfers control to IGC35099 if the bit is on 
in any CATTAB entry. 


IGC21099 -- TSO TERMINAL KEEP MESSAGE PROCESSING ROUTINE 


Constructs the KEEP message (IEF280E) for TSO terminals according to 
requirements passed from IGC06099, determines which TSO terminals are to 
receive the message, and directs the message to the terminals as well as 
to the SYSOUT device and to the operator's console. 


IGC23099 -- DECONCATENATION ROUTINE 


- Waits for the reading of the SIOTTTTR that IGC00099 (the control 
routine) initiated, and checks for reading errors. 

- Reads in all the SIOTTTRs and compresses then into a single array 
that it can index. Points to the TIOT entries specified for 
deconcatenation in the array, and performs processing to create a 
list of ddnames from the associated SIOTs and to check for errors. 
The resultant list comprises ddnames that are valid for 
deconcatenation. 

- Verifies that the TIOTs involved in the deconcatenation are not 
for open data sets. 

- Moves the ddnames from the list to the appropriate TIOT entries to 
accomplish the specified deconcatenation operations. 

- Transfers control to IGC25099 for DSE updating. 


. IGC25099 -- DSE UPDATE ROUTINE 


- Places the JFCB address contained in the DDIADD field of DAWTVARY 
into the DAWIP field also. 
- Transfers control to other routines as follows: 


e To 1GC27099 if the entry is via the allocation control routine 
or the deconcatenation routine. 

e To 1GC29099 if the entry is via the freeing or the concatenation 
routines. 


- Otherwise, processing continues via the DSESERCH subroutine, which 
looks for ddname(s) that the user supplies via either the DATASET 
Or the CONVERT function parameter lists. Reaction to the search 
is as follows: 


e Unsuccessful search (no ddname found) -- causes control to 


transfer to IGC26099 with a return code of X'504' in the DAWT. 
e Successful search: 


1) When entry is from the attribute conversion routines (CONVERT 
function), control passes to IGC26099. 

2) When entry is from the allocation routines (DATASET 
function), the routine calculates the size of the new DSE 
block, obtains storage for it, initializes it, and then 
transfers control to IGC26099. 
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IGC26099 -- DATA SET AND CONVERT UPDATE ROUTINE 


c - Moves the TCB address in from the parameter list and turns on the 
“dynamically allocated" bit; invokes the DSECHAIN subroutine to 
place the DSE to the top of the chain of DSEs; moves in the 
Status; determines whether entry is from the DATASET or the 
CONVERT function (through I1GC25099) and performs one of the 
following operations, accordingly: 


e DATASET - Places the device type and the volume serial number on 
which the allocated data set resides into the DATASET parameter 
list. 


e CONVERT - 


1) Exchange option specified -- Swap the positions of ddnamel 
and ddname2 in their respective DSEs. 

2) Normal and conditional dispositions specified -- Moves the 
specified dispositions from the CONVERT parameter list to the 
ddnamel DSE. 

- Processing the DSE for permanent allocation: turns on the 
“permanently allocated" bit. 
- Processing the DSCRG field in the DSE if the field is zero: 
® For old data sets - Moves the DSORG field in from the DSE update 
parameter list. 
e For new data sets - 

1) Sets the field "PO" if there is a directory quantity for the 
data set. Moves in the membername, if supplied. 

2) Sets the field “PS", otherwise. 


- Processing the DSE when the user specifies a password: 

c If there is no TTR in the DSE (DSETTRPW field), the routine issues 
the PROTECT SVC and places the returned TTR in the DSE. Then it 

releases the old DSE (for the DATASET function) and exits to the 

caller. 


IGC27099 -- DECONCAT AND CONTROL ROUTINE HANDLING ROUTINE 


- Entry from the allocation control routine (IGC00099): 
e Marking the DSE entries as not in use - 

1) Indicate by a DSLNGTH of zero in the input parameter list. 

2) Bit 31 in the input parameter list indicates that the TCB 
address field contains the address of the single DSE that is 
to be marked not in use. 

3) Bit 30 in the input parameter list indicates that all DSE's 
except those allocated to the current task and its ancestors 
are to be marked not in use. 

4) Otherwise the TCB address becomes the search argument for the 
DSESERCH subroutine, which determines the proper DSE to mark. 


e Processing for dsname updating - 
1) Places the address of the dsname in the DSNADD field of 


DAWTVARY in response to a nonzero indication in DSLENGTH. 

2) Uses DSNADD as the search argument for the DSESERCH 
subroutine, which looks for the proper dsname. 

3) For password data sets, ensures that any available password 
TTR, Or password itself, is in both the DSz¢ and the DSEUPDATE 
parameter list. Uses the password via the PROTECT SVC 98 to 

| attempt to obtain the password TTR for the parameter list if 

6 it is otherwise unavailable. 
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e Exit from the Allocation Control routine entry is always a 
return to the caller by ‘VC 3 after freeing the DAWT. 


- Entry from the deconcatena:iion routines (DECONCAT) : 
e Restores the dds of the concatentated ddnames - 

1) Uses the DSESERCH subroutine to look for matches to the 
search argument ddname in each successive DSE block on the 
chain, until it finds a block with a mismatch. 

2) Moves the ddname from the TIOT entry corresponding with the 
hext succeeding DSE block on the chain into each DSE block 
that produced a match. This operation performs the 
deconcatenation annotation. 


e Turns off the dynamically concatenated bit for each ddname 
deconcatedated as above. 


e Makes the exit determination depending upon whether SMF is 
active in the system. 
IGC28099 -- SMF EXIT ROUTINE 
Two operations: 


1) Dynamically maintains the TCTIOT after dynamic allocation 
processing of either data set allocation or concatenation functions. 


2) Builds a Type 40 SMF record after the freeing concatenation, or 
deconcatenation functions have executed. 


IGC29099 -- UNALLOC AND CONCAT UPDATE ROUTINE 


® Invokes the DSESERCH subroutine to look for the DSEs in inverse 
order from which their associated ddnames appear in the input 
parameter list. 

e Invokes the DSECHAIN subroutine to attach each such DSE as it is 
found to the beginning of the DSE chain. 

e Marks each such DSE as dynamically concatenated. 

e Propagates the first ddname (ddname1) through the ddname fields of 
each such marked DSE. 


- Entry from the freeing routine (UNALLOCe - 


e Invokes the DSESERCH subroutine to look for the freed ddname. 

e Fills all but the first ten bytes of the DSE with zeros, marks it as 
"DYNAM", moves in the ddname, and sets the dsname field to 
“NULLFILE". dsname 

e Invokes the DSECHAIN subroutine to attach the DSE to the end of the 
chain. 


Determines whether SMF is in the system, and exits appropriately. 


IGC30099 -- ATTRIBUTE LIST HANDLING ROUTINE 
Creates ATRCBs. 


Places ATRCBs on the ATRCB chain. 
Removes ATRCBs from the ATRCB chain. 
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IGC31099 -- TIOT OPEN BIT VERIFICATION ROUTINE 


Checks the bit which indicates in the TIOT whether or not the control 
block is for a currently open data set. Prohibits, by means of this 
verification, the execution of SVC 99 functions on open data sets. 


IGC35099 -- DCB UPDATE ROUTINE 


Updates the DCB TIOT offset after the dynamic concatenation routines 
have rearranged the TIOT entries for open data sets. 


IKJEFF18 -- DAIR ERROR CODE ANALYSER (DAIRFAIL) 


e Examines error return codes from dynamic allocation -- 


- From DAIR, 
- From SVC 99, or 
- From the catalog management routines. 


e Constructs an appropriate informational message based on the error 
code. 


e Invokes a special message writer to issue the message to the 
terminal by a PUTLINE macro instruction. 


Module Overview 


The following illustrations show the flow of control among the modules 
in each function of SVC 99. 
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Chart 01. DATASET Function Control Flow Overview 
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Chart 02. UNALLOC Function Control Flow Overview 
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Chart 03. Convert - Control Flow Overview 
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Chart:04. Concatenation Function Control Flow Overview 
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Chart 05. DECONCAT and ATTRIB & atrol Flow Overview 
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Chart .06. Update Function Control Flow Overview 
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Section 4: Directory 
Cc 


These directories contain information to help you find the appropriate 


program description, or assembler listing. They correlate information 
from three sources: 


e The source code. 
e The executable load modules. 
e This manual. 


DAIR DIRECTORY 


to a ee = > > 1 
| | ]Load ]Assembly|Control | | | 
|Module |Module |Section | | | 
| Label [Common Name|Name | Name | Name [ Description | Diagram | 
~------}-----------}--------}---—----}--------f---------------------------- $--------—-] 
| ATTRSRCH | ------~ | IKJEFDOO | IKJEFDOO | IKJEFD00|Search ATRCB chain for name. | | 
| | | | | | | 
|CHECKON |------- | IKJEFDOO | IKJEFDOO | IKJEFDOO| Flowchart label. i 20 | 
| | | | | | | [ 
| CKMEM (===>-—= | IKJEFDOO | IKJEFDOO | IKJEFD00| Flowchart label. | 20 | 
| | { | | | | f 
| CKME MORG | ------- | IKJ EFDOO | IKJEFDOO | IKJEFDOO| Flowchart label. | 20 { 
| | | ; | | | | 
| CONVTEST | ------- | IKJEFDOO | IKJEFD00| IKJEFD00| Flowchart label. | 20 | 
| | | [ | [ [ . | 
| DAIRCTRL|Control | IKJEFDOO | IKJEFDO0| IKJEFDOO| Initializes DAIRWA, routes | 20 | 
i | Routine { | [ [control to DAIR routine { |. 
; | [ ( | | corresponding to entry code. | | 
[|DAIROO |Code X‘'00° | IKJEFDOO0| IKJEFDOO|IKJEFD00|Search for data set in | 20 [ 
_ | | Routine | | | |DSE Chain. | | 
[ | | | | | | | 
|DAIRO& |Code X'O4&* |IKJEFDO0| IKJEFD00|IKJEFDO00|Search for data set in DSE | 20 | 
| | Routine | | [ {chain and system catalog. | [ 
| l [ | i | | | 
{|DAIROS |Code X‘'08’ | IKJEFD00| I KJEFDOO|[IKJEFDOO|Allocate data set by dsname | 20 | 
ee en A 
[DAIROC |Code X‘0OC° |IKJEFDOO| IKJEFD00|IKJEFD00|Concatenate data sets by {| 20 | 
{ | Routine | [ | |ddname. ( | 
| | | [ | 
{DAIR10 [Code X'10° | IKJEFDO0O0O| IKJEFD00|IKJEFD00|Deconcatenate data sets [| 20 | 
f | Routine H { | | by ddname. [ | 
| [ l i [ | [ | 
{DAIR14 |Code X'14" |IKJEFDO0| IKJEFDOO|IKJEFD00|Search for qualifiers for {| 20 | 
| | Rout ine | | | |dsname. | | 
| | | | [ [ { 
| DAIR18 | Code x'18° | IKJEFD0O| IKJEFDOO | IKJEFDOO | Unallocate a data set. ; 20 | 
TUE cect Se OE P| 
| DAIR1cC | Code X°1C° | IKJEFDOO| IKJEFDOO| IKJEFDOO|Allocate a data set to | 20 | 
{ | Routine | | | |the terminal. | [ 
[ | | | | | | | 
|DAIR24 |Code X'24* | IKJEFD00| IKJEFD00|IKJEFD00|Allocate a data set by | 20 l 
t | Routine | | | | ddname or dsname. | | 
i { | | | | | | 
{DAIR3O |Code x'30° |IKJEFDOO|IKJEFD00|IKJEFDOO|Allocate a SYSOUT data set. | 20 | 
[ | | | | | | | 
| DAIR34 | Code x'34° | IKJEFDOO | IKJeFDOO | IKJEFDOO| Perform attribute list | | 
| Routine | | | | operation. i ] 
a 2 LLL LL Lh ee ee ee he ee ee = 
( 
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aaa re ee {---S+=s2 : =o [oe 
| | | Load jJAssemi _y|Control | 

| | |Module |Module |Section | 

| Label |Common Name | Name | Name | Name f Description 

ae renee: ee ean peas eee ee me eee eee Cate ere een ee ee eee eee 
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GENDDN |Generate 


USERID |Userid 


SEARCH |Search 


IKJEFD00| IKJEFD00)JIKJEFDOO|Routes control from one 
; | | DAIR routine to another 
| [ j|Loads return code and 
| | jreturns to caller. 
| | 

IKJEFD00| IKJEFD00|IKJEFD00|Generates a ddname of the 
[ | | form ‘SYSnnnnn‘ where nnnnn 
| | jis a count in the ECT. 


| Processing 
| Rout ine 

| 

| 


| ddname 


| | 
IKJEFD00| IKJEFD00|IKJEFDOO| Prefixes userid to data set 
| Routine | | | name. 
| | 
IKJEFDOO | IKJEFDOO | IKJEFD0O0O|Search the DSE chain for 
jianformation about a data 
Jset. 


| Rout ine 
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20 


be YH 


SVC 99 DIRECTORY: 


aa ation aes 2 ia ee ae i Tee ei ee ye ae Loece a 1 
| | | Load |Assembly|Control | [ | 
| | |Module |Module |Section | | | 
| Label | Common Name| Name | Name | Name | Description [| Diagram | 
on aes n eee az 7. el 
| IGC00099|Allocation | IGCO009I|IGC00099|IGC00099|Creates DAWT, performs | 20 | 
| | control ! | | | appropriate initialization, | [ 
| | Routine | | | Jand routes control to the | | 
H | { [ | |xrequested function. | [ 
| | | | | | | | 
{ISC01099|Validity | IGC0109I1 | 1GC01099| 1GC01099| Performs validity checks {| 22 [ 
| | Checking | | | |for the freeing function, | | 
| | Routine | | | |gets and initializes the | [ 
| | | | i | UNALLOC work area. | | 
| | | | | | 
| IGCO 2099] Disposition| IGC0209I| IGC02099|IGC02099|Initializes message buffers,| 22 [ 
| |Processing | { [makes appropriate disposi- | [ 
| | routine | [ | |changes to catalog, and | [ 
i | | | i | issues disposition messages. | [ 
| | | | | | 
| 1GC03099 | Device |] 1GC0309I | IGCO3099| I1GC03099| Performs the operations | 22 | 
| | Freeing i | | |mecessary to free the data | | 
i | routine | | [ jset requested. | [ 
| | | | | | | { 
{| I1SC04099 |SYSOUT | IGC0409I]| IGCO4099| I1GCO04099| Provides interim processing | 22 [ 
| |Chain DSB | [ | |for SYSOUT data sets | | 
| | Processing | | | |between initial validity | [ 
| | routine { [ H |checks and disposition | | 
! | | ‘ aascantiiess | : 
| 1SC05099 | SYSOUT | 1GCO0509I1| 1GC05099 | IGC05099| Performs the necessary | 22 |. 
| |Enqueuing | | | | operations to enqueye the | | 
| | routine [ | | |data set on the proper | | 
YY | | | | i joutput class. | | 
| | | | l | | { 
| I1GC06099| KEEP Msg | IGC0609I| IGC06099 | 1GC06099|Completes KEEP message | 22 | 
| | Processing | | | | IEF280E for the SYSOUT [ i 
| | routine [ i | |device and the console, | | 
| | | | | Jand/or partially prepares it] [ 
| | | | [ |for TSO terminal. | { A 
| | | H 
eco 7096 -waitaseion ieeeomosn mcrae aacurose Wecer ores a series of checks | 21 | 
| jan Initial-| i | jJupon the validity | | 
[ | ization | | | Jof the input to the | | 
| | routine | | | | function of allocating data | { 
aconoteranoe  luoconostnecononlsecononl ro 
| IGC0 8099] SYSOUT | IGCO0809I| I1GC08099|1GC08099| Processes SYSOUT data {| 21 | 
| | Processing | | | |sets, and generates a | | 
| | routine { { { j|dsname if necessary. | | 
| | | | | I | | 
| IGC09099|SIOT and | IGC09091} IGC09099|1IGC09099|Assigns a record for the {| 21 | 
| |JFCB Con- | { | |JFCB, if necessary, init- | | 
| [struction | | | jializes and saves the SIOT | | 
| | routine | | [ jin a buffer, and initializes| | 
| | | | | jthe JPCB. | 
et So Boe cape ee Posen ees Bs ho Bore iat ee Se Pea as J 
(Cont inued) 
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Cts Ss SNe rar er a eg vee Mee Ee ey ee Tov ose cos 1 
[ [ | Load [|Assem ly|Control | [ | 
|Module |Modul: [Section | [ | 
| Label |Common Name |Name | Name | Name [ Description | Diagram } 
—~-—-——= $-----------}--------}---------}--------}----------------------------f-- === 
IGC10099| Data Set IGC1009I| 1GC10 )99}]1GC10099|Searches the DSENQ table to 21 | 
| Enqueuing | ensure that the data set | 
| routine |name is properly enqueued. | 
| If necessary, performs 
| jan ENQ. 
| 
IGC11999|1GC11099|Writes and chains the up- 21 


|date and | dated DSENQ record, if nec- 
| DNT Load jJessary, and converts the 
jroutine junit name parameter to a 


| [device type using the device 


Jname table (DNT). 


| 

| 

| 

| 

: | 
IGC11099]| DSENQ Up- |1GC11091 

| 

| 

| 

| 

| | 

| 


eee eee OO ges Oe ee ee ee OE os 2 
ae ee eee ee eee ee ee OO ee ee ae 


| | 
IGC12099| Bit Pattern| IGC12091| 1GC12099|1GC12099|Uses the device mask table 


| | 
| | 
| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
{ | 21 | 
| |Construc-_ | | (DMT) or searches the | | 
[ [tion [ [ [ | UCB's to convert the device | |. 
4 | routine | | ; [type to a bit pattern | | 
| | | ; { |xepresenting eligible | | 
| | | | | eee | | 
| 1GC13099| Device {| 1GC13091 | I1GC13099 | 1GC13099| Prepares a list of UCBs | 21 | 
| |Reduction | ; | Jfor valid allocation can- | | 
i | routine | | [ | didates from the bit pattern| [ 
| | } ; | |derived from processing in | | 
| | | | | | IGC12099. | l 
| IGC1 4099] DADSM | IGC1409I| I1GC14099|1GC14099| Prepares a candidate attri- | 21 | 
| | routine | { | bute list and searches it | | 
| | | | i jfor the best logical candi- | | 
| | | | | | date for allocation; in- | | 
4 | [ | [ |vokes DADSM to allocate i | 
| | [ | ; jthe required space. | | J 
| l | l | [ | | 
{IGC15099|TIOT and . |I1GC15091I|1GC15099 | 1IGC15099| Updates the JFCB and TIOT {} 21 | 
| | JFCB Update| | i Jas necessary to complete | | 
| | routine | | [ | allocation. | | 
| | | l | ! 
pieencoss wadaaiey 1061/6051 aeG16095| 16e16095 |checks the validity of | 23 | 
| | Checking 4 [ [ | ddnames and member names | [ 
d | routine [ [ i |specified for the attri- [ | 
| | | l | bute conversion function. [ | 
{ | | | | [ | | 
[IGc17099|sIor and | IGC17091| 1GC17099|1GC17099| Updates the JFCB, the SIOT, | 23 | 
| {| JFCB Updat-| i jand the TIOT as necessary | | 
j jing routine | i [ Jto reflect changes to the ; | 
| [ 4 i | |data set attributes, as ; | 
| | | | | | specified. | | 
| 1GC18099|Concaten- | IGC1809I| IGC18099|IGC18099|Builds the CATLST and | 24 | 
i jation | | | |CATTAB and uses them to | | 
| {List Con- | | i |begin modifying the TIOT. | | 
| [struction § | { | | | | 
| | routine | | | | | 
l ao | | | | | | 
| 1G6C19099|TIOT Build | I1GC1909I1| 1GC19099]|1GC19099| Performs remaining nec- | 24 
[ [ing routine| | [ Jessary TIOT updating to i | 
| | ; | [complete the requested | | 
| | ; [ [ | concatenation. | | 
bos eS 5 eae eee Sara ee ere 1 coe ome nea Ra oe i nee ry eee y Ao eet eee Ua wae as Stk eta a fe ner Se 4 
(Continued) 
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T T T T T oor nee ee 1 
| | Load |Assembly|Control | | | 
' | [Module |Module |Section | | | 
| Label ieee Name | Name | Name | Name { Description | Diagram | 
| I1GC20099|TIOT Mov ing| 1GC20091| 1GC20099|1GC20099| Determines whether DCB up- i 24 ; 
| | routine [ | | | dating is necessary and | | 
| | | | [moves the new TIOT over | ; 
; | | | {the old one. | | 
| 1GC21099|TSO Term- |1GC2109I|1GC21099|1IGC21099|Constructs message IEF280E | 22 i 
( Jinal KEEP | | Jand directs it to the [ ( 
| [Processing | | | | proper terminals. [ | 
| | | | | 
| 1GC23099| Deconcate- | I1GC2309I] 1GC23099|1GC23099|Modifies ddnames in TIOT | 25 | 
| [mation [ | | |entries as necessary to | | 
| | rout ine | | [ |accomplish the requested | | 
\ | [ i | | deconcatenation operation. | | 
| 1GC25099| DSE Update | 1GC2509I|1GC25099|IGC25099|Initializes updating oper- | 26 | 
{ | soutine | | | | ations and transfers con- l | 
i | | { | [trol to appropriate modules | ] 
| | [ [ | | for the specific updating { | 
| [ | | | |required. The kind of up- | ; 
| | | | | |dating required depends | [ 
J | { | Jupon the function code. | ; 
| 1GC26099|DATASET and |IGC2609I[1GC26099|1I1GC26099| Updates the DSE appropri- | 26 i 
i | CONVERT | | | Jately for entry from | | 
| Update | | | DATASET or CONVERT | | 
| cones | | | | functions. | [ 
| | | | | | | 
| 1SC27099]| DECONCAT | IGC2709I| 1GC27099| I1GC27099| Updates the DSE appropri- | 26 | 
| [and [ | | Jately for the entry from [ | 
| {Control | | [ | DECONCAT or the allocation | | 
| | Routine | [ ; jcontrol routine. { | 
| | l | | | | I 
| IGC28099| SMF Exit | IGC2809I| IGC28099|1GC28099| Builds a Type 40 SMF record | 26 | 
ww | | routine | { | for SMF to reflect the | | 
| ; | | | jupdating of the DSE. | | 
| IGC29099|UNALLOC and{|1IGC2909I| I1GC29099|1IGC29099|Updates the DSE appropri- | 26 | 
| | CONCAT Up- | [ | {ately for the entry from | | 
| Jdate rou- | | | |the UNALLOC or CONCAT | | 
| {tine [ [ [ | functions. | ; 
| | | | | | 
J IGC30099|ATRCB Up- |1IGC3009I]| I1GC30099 | 1GC30099| Builds, chains, and frees | [ 
| [date rou- | | | | ATRCBs [ ( 
|tine | I | | | | 
| | | | | [ 
JISC31099|TIOTF Open |1GC31099 | IGC31099| IGC31099|Checks TIOTOPEN bit in | | 
| [Bit Verifi-| | | |TIOT to determine whether [ { 
| jcation Rou-| [ | jthe request is for an [ ; 
| [tine | | | | operation on an open data [ ] 
| | | | | \ | | 
;1GC35099|DCB Update |1GC3509I[1GC35099|1GC35099|Updates the DCB after con- | 26 | 
| | routine | | | jcatenation operations, if | ] 
{ | | | | |necessary, prior to DSE { | 
| | | | |updating. | | 
{DSECHAIN|DSE Chain [1IGC2609I|1GC25099|1GC25099|Chains DSEsS appropriately | 25 | 
| |jsubroutine | | | Jfor permanently allocated | 
| i i | | | data sets. | j 
| | | | | 
ipeeeeRGa Bee Search Neesb gsi eevee eeaBOs Leaks for the ddnames spec- | 26 { 
| |subroutine | | | {ified in the user's param | | 
| | | | | jeter list for the update { | 
| | | | | | function. | | 
bao Soe ears pO ee ee Bee cee eee a a 41... ~— -—— — + ~~ — + + + = A Ce ee eee rene ee J 


L 
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DAIRFAIL DIRECTORY 


NO 
fe 8) 


NO 
foe] 


Gas == a da a : Rn eee To Tagore (te ee ee ee ee T 
| | | Load |Assembly|Control | | 
[ | Common {Module |Module |Section | | 
{| Label |Name | Name | Name | Name | Description [ 
a a I a a a a a ta a ee ee + 
IKJEFF18|DAIR |] IKJEFF18 | IKJEFF18|IKJEFF18|Analyses dynamic allocation | 
| Error ] | lerees codes and prepares | 
| | Code | | [ | appropriate informational | 
| | Analyser | | | jmessages. | 
| | (DAIRFAIL) | [ l i | 
| | | | | | | 
| TSMSG | DAI RFAIL | IKJEFF18 | IKJEFF18|IKJEFF18|Contains DAIRFAIL message | 
i |Message | | | | frameworks. | 
! | | | | | 
| IKJEFFO2|DAIRFAIL {|IKJEFFO2| IKJEFF02|IKJEFFO2| Issues the DAIRFAIL | 
[ [Message | | i |messages. | 
[ [Writer | | | | 

I a ee 
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ee cs ee es eee = ee oe 


Section 5: Data Areas 


This section describes the major data areas that DAIR and the SVC 99 


routines use, including: 


Attribute control block (ATRCB) 


Candidate list 


Concatenation list (CATILST) 


Concatenation table (CATTAB) 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


DAIR 


Data 


attribute 
work area 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 


parameter 


set extension 


control block 


(DAI RWA) 


block, 
block, 
block, 
block, 
block, 
block, 
block, 
block, 
block, 
block, 
block, 
block, 


block, 


code xX‘'00' 
code X‘'0O4' 
code X‘08‘ 
code xX‘Qdc* 
code x‘10° 
code X‘'14' 
code x‘'18' 
code 
code X‘* 24° 
code X* 28° 
code X*‘2C‘' 
code xX‘'30' 


code x‘'34° 


list (DAPL) 


block (DSE) 


(DAI RACB) 


(DAPBOO) 
(DAPBO4) 
(DAPBOS8) 
(DAPBOC) 
(DAPB10) 
(DAPB14) 


(DAPB18) 


X*"1C* (DAPB1C) 


(DAPB24) 
(DAPB 28) 
(DAP B2C) 
(DAPB30) 


(DAPB34 ) 


Dynamic allocation parameter block, code xX‘0Q0O' 


Dynamic allocation parameter block, code X*01" 


Dynamic allocation parameter block, code X‘'02' 


Dynamic allocation parameter block, code X‘'Q3' 


Dynamic allocation parameter Block, Code X‘O4' 


Dynamic allocation parameter block, code’ X*‘05° 


Dynamic allocation parameter block, code x*"06° 
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Dynamic 
Dynamic 
Dynamic 
Dyanmic 
Dynamic 


Dynamic 


allocation 
allocation 
allocation 
allocation 
allocation 


allocation 


parameter block, code xX'‘'07'* 


work table (DAWT) 


work table, 
work table, 
work table, 


work table, 


variable area 
variable area 
variable area 


variable area 


(DAWIVARY) for CONVERT 
(DAWTVARY) for CONCAT 
(DAWTVARY) for UNALLOC 


(DAWIVARY) for UPDATE 


ENQUEUE/DEQUEUE parameter list for allocation/termination resource 


ENQUEUE work area (EQA) for enqueuing dsname 


Pattern construction area (PCA) 


SYSOUT work area (SWA) 


Unallocate work area 


The following information is included for each data area: 


Size in bytes. 
Name of the routine that creates it. 
Name(s) of the routine(s) that use and/or update it. 
Field names, displacements, size, 
Cross-reference to method of operation diagrams. 


and contents. 
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ATTRIBUTE CONTROL BLOCK ( 
Size: 

Located in: 

Creat ed by: 

Used by: 

Updated by: 


Contents: 


ED ee Oe eee ee ee ee ee oe ee ee ee ee = 


—r 
| Displacement |Field 


ATRCB) 


61 bytes. 


Subpool 


255. 


IGC30099 (SVC 99). 


IKJEFD00, IGG09099, 1IGC17099, 


None. 


IGC30099. 


User requested data set attributes. 


|Size in| | 
| Dec. Hex .| Name [Bytes | Contents [ 
|------—----}--~------- }------- ¢---------=--~-~----—----~-----------—- | 
| 0 0 |ATRFORWD | 4 |Address of next ATRCB. | 
| | | | | 
[4 4 JATRBCKWD | 4&4 [Address of previous AIRCB. ; 
J | [ | | 
[8 8 |------- {| 4 | Reserved. | 
| l | 
J12 Cc | AT RNAME | 8 | Attr-list-name. [ 
| [ | | 
{20 14 |ATRLNGH | 2 | Length of ATRCB. | 
| | | ( 
[22 16 |ATRMASK | 8 | INOUT/OUTIN options of OPEN. | 
| | | | 
[22 16 |------- | 6 | Reserved. [ 
| | | | 
|28 1C |ATRLABEL | 1 |Specifies OPEN type: | 
| [hess «esac | INOUT. { 
| oe a | OUTIN. | 
| 
{29 1D... | ======= | 1 | Reserved. [ 
| | | | 
{30 1E |------- | 3 | Reserved. | 
| | | | 
{33 21 {|ATREXPDI | 3 | Data set expiration date. i 
| [ | | | 
[36 Zu. [=====-= | 2 | Reserved. | 
| | | 
[38 26 |ATRBUFNO | 1 |No. of buffers required. [ 
| | | | 
139 27 | ATRBFT EK | 1 | BFTEK, BFALN: | 
| Leds, <e-ace'l | Simple buffering “S° ; 
| es eee | Automatic record | 
| | | area construction “A" | 
| Veowkd.. earees| | Record buffering “R* i 
[ [iseed- -seare-| } Exchange buffering “E" | 
; pears ae eee | i Doubleword | 
| | | | boundary "DD? | 
i (eee ee | Fullword boundary *Fr* { 
| | | | | 
{40 28 | ATRBU FL | 2 {Buffer length. | 
[ | | | | 
| 42 2A  |ATREROPT | 1 j Error option: [ 
| ji... Siete ie: | Accept the error record. | 
| J-1.. cee | | Skip the error record. | 
| ioe Scacevatl| | Abnormal end of task. | 
(aan are P ie ee ee p pretpae scene a ce) a ee a ee A ee a ee ee A ae ee ee J 


(continued) 
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oe See Se ee le et ee eS et es ee PE Th, 
| Displacement] Field |Size in| 

| Dec. Hex. | Name |Bytes | Contents 
}-----~-------4---------- $------- fan rrr rr rrr rrr { 
[43 2B |ATRKEYLE | 1 {Key length. 

| | | | 

{44 2c j===---= i 6 | Reserved. 

| | | | 

{50 32 |ATRECFM | 1 |Record format: 

[ (Lewsey. desratcsl | Fixed "Fr" 

| eae | Variable “v" 

| LAies, sees | Undefined "U* 

| books: ecco | Track overflow ee 

[ Lacie: - creer). | Blocked *"B" 

| [ower  Dearae| | Standard blocks “S° 

| [esce ~sisc| | ASA printer chars. “°A" 

| seen oes | Machine control 

| | [ | character *M" 

| | | | 

{51 33 |ATROPTCD | 1 | Option code: 

[ [hee 26.6 | | Write validity 

| [ [ | check *w* 

| Pisele: .oscte | | Chained scheduling "°C" 

; lioteves . ‘Paves | ANSI translate "0" 

| [ewes cede! | User totaling as ts 

[ { | | 

| 52 34 |ATRBLKSI | 2 |Maximum block size. 

l | | | 

{54 36  |ATRLRECL | 2 {Logical record length. 

; | | | 

| 56 38 |ATRNCP } 1 {Max # of READ/WRITE macros before 
| | | | CHECK. 

| | | { 

{57 39. (| ==-=-=- | 4 | Reserved. 

ee ae ee eee SE MNLE'S (eee ee ND UTERO Cee Ee ON Stan eR NE fe RE Re es REN Ren Ee Ee FOE PRE a 
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CANDIDATE LIST (CANDLIST) 


Size: Variable -- 4 bytes of control information plus 
4 bytes for each UCB address in the list. 

Located in: Subpool 253. 

Created by: IGC13099. 

Used by: IGC14099. 

Contents: Address and control information for allocation 


I/O load balancing. 


jrefer to the number of candidates in 
{|LBNBRCDT (above) to determine the 


Jlength of this field. 
Seen eee a 


|Operaion | 

|Diagranms | 

—— 

| 21 | 
Se 1 Rae i Seana 5 a ie SSS { 
| Displacement|Field {Size in | | 
| Dec. Hex . | Name | Bytes | Contents [ 
f--—--------- }--—------- +-------- {--------_-----____-----—_-------- -—4 
| 0 0 | LBFCNDE | 1 [Bit settings, as follows: | 
; | | [Bit Meaning when on | 
| | | | 0 Retry at candicate selection; | 
| | | | if zero, the first attempt [ 
| | | { at candidate selection. ( 
| | | J1-7 Reserved. l 
| | l | | 
}1 1 ;---=-=— | 1 | Reserved. [ 
| | | | | 
{2 2 {|LBNBRCDT | 2 [Number of candidates (more than one) | 
{ | | [in the list. | 
[ | | | 
[4 4 LBCNDAT | Variable|Addresses of UCBs of candidates; { 
| | | 
| | | 
| | | 
L re 
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CONCATENATION LISI (CATLST) 


S1ze: Variable -- 4 bytes for each address in the 
list. - 

Located in: Subpool 252. 

Created by: IGC18099. 

Used by: IGC1 8099. 

Contents: A list of identically formatted four-byte 


addresses of the TIOT entries to be 
concatenated as illustrated below. 


(=== 1 

| Operation] 

{Diagrams | 

| 24 | 
Ce ee MN ae ee a ree eae ee eG 4-—-——————— { 
| Displacement] Field |Size in| i 
| Dec. Hex. | Name | Bytes | Contents | 
|------------ {--------+=- +-=-=-—— santana a { 
| 0 0 {-- | 4 {Address of a TIOT entry to be | 
| | { | concatenated. | 
a ee eee OB SN a a a ee et J 
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CONCATENATE TABLE (CATTAB) 


Size: Variable -- 12 bytes for each TIOT entry. 
Located in: Subpool 252. 

Created by: IGC1 8099. 

Used By: IGC19099, IGC20099. 

Updated by: IGC19099. 

Contents: A table consisting of one entry for each entry 


of the TIOT, in the format shown below. 


feos re too 
| Operation | 
|Flowcharts|Diagram | 
}---------- }-—--—— 
| JD | 24 | 
(ee {9-2 {== aa a ca SSS SSeS SSS S=S= { 
| Displacement |Field |Size in| | 
|Dec. Hex. | Name | Bytes | Contents [ 
}------------}~--------- +------- }-----------------+------------------- 4 
| 0 0 | OLDISP i 4 |Old address of the entry. | 
| | | | , | 
14 4 | NEWDISP | 4 |New address of the entry. | 
| | | | | 
| 8 8 | NEWPOS } 1 |New relative number of the entry. | 
| | | I [ 
|9 9 | ENTHND | 1 |Flag that indicates completed | 
i | | | processing of the entry. | 
| | | | 
{10 A | DCBUP i, 1 |Flag that indicates the potential ( 
| | | |xrequirement for the updating of the | 
| | | | DCB. | 
| | | | 
{11 B |-- {| 1 | Reserved. | 
et apes gee er Fed pee eee y een 1 EI Sele testy pe air at a RE NP ee EE J 
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DAIR ATTRIBUTE CONTROL BLOCK (DAIRACB) 


Size: 47 bytes. 
Located in: Subpool 1. 
Created by: IKJ EFFAT. 
Used by: ISC30099 (SVC99). 
Updated by: None. 
Contents: DCB parameters to go into an ATRCB. 
(———-- === 7 
| Operation| 
[Diagrams | 
bose 
| 27 | 
a ae eee ee "------- gS SSS SS = = 4—------—-—-- { 
| Displacement |Field |Size in| | 
| Dec. Hex . | Name {Bytes | Contents [ 
}------------ }---------- +------- }------------------------------------- 4 
| 0 0 (==Ss2-5 | 8 | Reserved. { 
| | | | 
{8 8 | DAIMASK | 8 | INOUT/OUTIN options of Open. | 
| | | | | 
18 8 (--==S=- | 6 | Reserved. | 
| | | | 
{14 E |DAILABEL | 1 [Specifies Open type: | 
| ji. ee eee #8 | | INOUT. | 
[ i rs ee es @# ee ®@ [ i OUTIN. | 
| l | | | 
}15 F Loewe weee | oh | Reserved. | 
| | | | | 
[16 10 |------- | 3 | Reserved. | 
| | | 
}19 13  |DAIEXPDT | 3 |Data set expiration date: | 
|. | DAITY EAK j 41 | Year. | 
[ | DAIDAY | 2 | Day. | 
| | | l | 
[22 LG. joss | z | Reserved. [ 
| | | | | 
}24 18 |DAIBUFNO | 1 [No. of buffers required. | 
| | | | | 
| 25 19 |DAIBFTEK | 1 | BFTEK/SF ALN: [ 
| Lede serdcl | simple buffering “s* | 
| ic dde: teers | Automatic record [ 
{ | | | area construction “A | 
| P oxerdks | | Record buffering "R* f 
| ee errs | | Exchange buffering “E" | 
| [pane sede) | Doubleword | 
H | | | boundary "Dp" i 
| ieree ee i | Fullword boundary "EF" ; 
| 26 1A |DAIBUFL | 2 |Buffer length. | 
| | | | | 
{28 1C |DAIEROPT |{ 1 | Error option: | 
| Ul: ears =-5:o4u:l) ~! Accept. | 
| fiedsce? recess | | Skip. | 
| [ aed. es | | Abnormal end of task. | 
|29 1D |DAIKEYLe | 1 |Key length. | 
| | | | | 
| 30 1E [Hess S=> | 6 jkeserved. | 
SE eer ee ae ad ies gees hee eae ac aN pena a Z| 
(Continued) 


290 OS/VS2 Terminal Monitor Program (VS2 Release 1) 


-—. .- 1 Me ee es ee ee 1 
| Displacement |Field {Size in| | 
| Dec. Hex .| Name [Bytes | Contents | 
a eS a Sas 
| 36 24 |DAIRECFM | 1 |Record format: | 
|. [Vee verge ere:'| | Fixed "F* [ 
| J -1.. .w.| | Variable wa” fa [ 
| i eee | | Undefined et © as | 
| fiddle. wees | Track overflow ee a 
| | @ @ @ 1 @®es ee ; | Blocked "BB" | 
| [ewe Lace: | | Standard blocks “sS™ | 
| [seen shee] | ASA printer chars. “A" | 
| Leese Vere | | Machine control | 
| { | [| character “M* | 
| | | | | 
[37 25  |DAIOPTCD | 1 [Option code: | 
| | 1 eo eo @ @®@*es | [ Write validity | 
| | | | check ball” ad | 
| | ..1. cooel | Chained scheduling ‘%°C" | 
| Pees <heceiel | ANSI translate *“O* | 
[ Loses sade | | User totaling ss (a | 
| [ [ | | 
{38 26 |DAIBLKSI | 2 |Maximum block size. | 
| | [ | [ 
| 40 28 |DAILRECL | 2 [Logical record length. | 
{ | | | | 
[42 2A |DAINCP { 1 |Max # of READ/WRITE macros before | 
| | | | check. | 
| | | | 
{43 2B |------- { 4 | Reserved. | 

5 


Dn ce ee oe ee a a ee hh te we a ee ew wn wn en ww wn wwe 
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DAIR WORK AREA (DAIRWA) 


Size: 116 bytes. 
Located in: Subpool 1. 
Constructed by: DAIRCTRL. 


Updated by: 


All DAIR Routines. 


Used by: All DAIR Routines. 
Contents: Addresses and control information for use of 
all DAIR routines. 
(Se a 
| Operation| 
|Diagrans | 
| 20 | 
(a ; Se : ars a a ga a le SSS See 1 
| Displacement |Field |Size in| | 
| Dec. Hex . | Name {Bytes | Contents | 
}------------ }---------- t-~----- |---------------------------- ---------- { 
| 0 0 | DSEADDR ; 4 jAddress of first DSE block. | 
| | l | 
[4 i | SAVPTR j 4 jJAddress of register save area. | 
| | | | 
| 8 8 | TCBADD | 4 [Address of TCB. | 
| | | | | 
j12 Cc | USERID | 8 |Userid (from the PSCB). [ 
| | | 
| 20 14 |UNITDEF | 8 {Default unit name (from the PSCB). i 
| | | 
| 28 1C |PARMPTR | 4 {Address of DAIR Parameter List. | 
| | | | | 
| 32 20 |RTCODE | 4 | Return code. | 
| | | | | 
| 36 24 |RTCODE15 | 4&4 | Return code. | 
| | | | | 
| 40 28 =|LIST99 } 4 [Address of Alloc andi DSE Parameter [ 
| |List. | 
[44 2C |LIsT99sz | 4&4 [Size of Alloc and DSE Parameter List. | 
| | | | | 
| 30 |CATLIST [| 4 | Address of Catalog List. | 
| | | | 
| 34 |CATLSTSZ | & {Size of Catalog List. | 
| | | | 
|56 38 |SEGSAVAR | & |Address of secondary save area. [ 
| | | 
{60 3C |SECSAVSZ | 4&4 |Size of secondary save area. | 
| | | | | 
| 64 40 |DDNPTR ; 4 [Address of needed ddname. | 
| | | | 
| 68 44 |DSNPTR | 4 | Address of needed dsname. | 
| | | | | 
| 72 48 |MEMPTR | 4 | Address of needed membername. | 
| | | | 
176 4C |BLKPTR | 4 | Address of next DSE block. | 
| | | | 
| 80 50 |DDNADDR | 4 j}Address of DSE block for ddname. | 
beets paren eee ee eer a [ sc sa ge J 
(continued) 
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ae er We a US te ee ee ee ip Ne pede te 1 
|Displacement |Field |Size in| | 
| Dec. Hex .| Name {Bytes | Contents | 
|------------ +-------—-- +——----- t-~--~--------------------=------------ ! 
4 594 |DSNADDR 4 | Address of DSE block for dsname. 

| 
4 | Address of DSE block for data set 

jmarked not in use. 

| 
4 |Address of DSE block for data set 

|marked for dynamic allocation. 


1 | Bit settings as follows: 


ce 


| 
58  |NOTUADDR 


1° 2) 
‘© 


wo 
Se) 


5C DYNMADDR 


oo 
On 


60 STATUS1 


to 
ct 


Meaning when on 
Catalog search is required. 


Use DSE block to build parameter 
list. 

Stop at first occurrence of 
dsname in DSE. 

dsname found at least once. 
dsname is a member of a 
dynamically concatenated group. 
dsname is a member of a 
concatenated group. 

dsname appears more than once in 
DSE. 

Default status to OLD. 


~] On Sa) WwW NO _ 


WO 
~] 


61 STATUS 2 it settings as follows: 


Dm 


- 
cr 


Meaning when on 
Key on ddname. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Attr-list given. | 
Attr-name found. | 
| 

| 

| 

[ 

| 

| 

| 

| 

| 

| 

| 

i 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

4 


Attr search DSES. 
Used as follows: 


FWNHRO 


t 
~] 


B‘0001‘'-control returned to 
DAIROS8 from DAIR18. 


B*0010'-control returned to 
DAIROS8 from DAIR10. 


B‘0011'-control returned to 
DAIR18 from DAIR10. 


B‘'0100‘-control returned to 
DAIR1iC from DAIR18. 


B'Q101‘'-control returned to 
DAIRIC from DAIRIO. 


0110-control returned to DAIR28. 


0111-control returned to DAIR30 
from DAIR18. 


B'1000‘-control returned to 
DAIR30 from DAIR10. 


Pr _a wees 2 gee Oe See ee gee Oe gs OO ge Oe ee Oe ee 2 ee ee oe Oe ee ee = ae gee eee gees SE ee eo es Oe ee ee gee eee ge Se es ee ee oe 2 ee ee oe 2 ee 
-_—— ee SE gees ee ee ee ge ge oe gs SE ee Se os SE ogg, gg SE og SS pe SE ee SO ge SS ee SE ge SS gs os 2 


fe eee oe ee = cee ee eee See eee ee eee ee pe eo ee ee ee ee eee ee ee ees ee ee ee ees eee es ee ee eee ee ee eee ee ee ee ee ee ee ees ee ee oe ee ee 


Section 5: Data Areas 293 


ee ge a A Des ie 


| Displacement | Ficid | size in| 

| DEC. Hex. | Name [Bytes | Contents 

}-—~--~---~-~ }---------- +------- }----------------=--------------------- { 
| 98 62 |SWITCHES | 1 |Bit settings as follows: 

| | | | 

| | | |Bit Meaning when set 

| | | 0 This is a CONVERT data set. 

| | | |1 A MOD as NEW data set. 

| | | | 2 A LOCATE was performed. 

| | ] {3-7 Reserved (0). 

| | | | 

199 63° ‘PoSsesss= | 1 |Reserved (0). 

| | | | 

}100 64 |CNCAADDR | 4&4 jAddress of concatenated data set 

| | | Jmarked not in use in its DSE. 

| | | | 

{104 68 |ATRLNAME | 8 |Name of the attribute list. 

| | | | 

[112 70 |ATTRADDR | 4&4 af Attribute control block (ATRCB). 
ee ee eral eee Sea es a a ea SC en 


© 
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DAIR PARAMETER BLOCK, CODE X‘'00° (DAPBOO) 


Size: 20 bytes. 

Located in: Subpool 1. 

Created by: Calling program. 

Updated by: DAIROO, USERID, SEARCH. 

Used by: DAIROO, USERID, SEARCH. 

Contents: Addresses and control information for DAIROO. 
aia Pee aa 
| Operation| 
[Diagrams | 
| 20 | 

sere oie ey Me er ee go aS =e 

| Displacement| Field [Size in| [ 
| Dec. Hex. | Name [Bytes | Contents [ 
|------—----}---------- }-----— }-------------------------------------- ! 

J 0 0 | DAOOCD | 2 [Entry Code X‘*0000°. | 

| | | 

[2 2 | DAOO FLG | 2 [Flags set on return, as follows: | 

| | | | l 

| i | [Bit Meaning when on | 

| | | | |. 
| | i [0-3 Reserved(0). | 
| | | | | 
| |DAOOPERM | [4 ddname or dsname is permanently | 
| [ | | allocated. | 
| | | | | 
| |DAOODYNM | [5 ddname is a DYNAM entry. [ 
| | | | | 
| | DAOODSE | | 6 dsname currently allocated (in | 
| | ;- & | 

[ |DAOOTERM | [7 ddname currently allocated to the| 

| | | [ terminal. | 

| | | | | 
| | | | 8-15 Reserved (0). | 
| | | | | 

{4 Hy |DAOOPDSN | 4 [Address of dsname Buffer. { 

| | | | | 

| i | |The format of the dsname Buffer is as | 
| | { | follows: | 
| | | | | 
| | | | Byte Contents ] 
| | | | 
| | | {0-1 The length, in bytes, of the | 

{ { | [ dsname. | 

| | | | eee | 

| | | {2-45 The dsname, left justified, and | 
| | | | padded to the right with blanks. | 
| | | | | 

[8 8 | DAO0 DDN | 8 |ddname for the data set to be searched | 

[ | | |for. (If dsname is present, this | 

| | | | field is ignored.) | 

Liaise 5 ek ce ee ey en ae tS a ee eee ee ea. 5 


(Cont inued) 
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N 


ile a fe Cao gre ee re eg ee ee ee 1 
| Displacement| Field |Size in| | ) 


2 Direct organization (DO). 
3-5 Reserved (0). 
6 


Partitioned organization (PO). 


~] 


Unmoveable. 


| Dec. Hex. | Name {Bytes | Contents | 
}------------ $---------- }------- }-------------------------------------- { 
| 16 10 |DAOOCTL |} 1 |Bit settings, as follows: | 
| | | | | 
| | | |Bit Meaning when on | 
| | | | | 
[ | | }O-1 Reserved (0). | 
| | | | | 
| | DAOOUID | 2 Prefix userid to dsname. | 
{ | | | | 
| | | [3-7 Reserved (0). | 
| | | | 
{17 it. [Ses=S==— | 2 | Reserved (0). | 
| | | 
{19 13 DAOODSO |} 1 |Bit settings that indicate the | 
| | | organization of the data set, as | 
| i | follows. | 
| | | | 
| | [Bit Meaning when set | 
| | | 
| | 0 Indexed sequential (IS). | 
| | | 
| | 1 Physical sequential (PS). | 
| i | 
| | l 
i | | 
| l | 
| i | 
| l | 
l i i 
| l | 
L L J 


pe ee ee ee ee ee ee ee 
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DAIR PARAMETER BLOCK, CODE X‘'Q4* (DAPBOG) 

Size: 16 bytes. 

Located in: Subpool 1. 

Constructed by: Calling program. 
Updated by: DAIRO4, USERID, SEARCH. 
Used by: DATRO4Y, USERID, SEARCH. 


Contents: Addresses and control information for DAIRO4. 


poe ee eS 
| Operation| 
[Diagrams | 


[aa a rae : a a Sac am aca ee i 
| Displacement| Field {Size in| | 
| Dec. Hex. | Name |Bytes | Contents | 


------- }--------------------------------------] 
2 | Entry Code X*QQO04". 


| Flags set on return as follows: 


'e] 


Bit Meaning when on 
4 Reserved (0). 
DAO4SCAT 
DAO4 DS E 


OQ- 

5 dsname found in catalog. 

6 dsname currently allocated in 
DSE. 

7-15 Reserved(Q). 


2 | Reserved(Q). 


CO + 
£ 


DAO4 CT RC 2 | Error return code for catalog 


[management routines. 


0 
ie «) 


DAO4YPDSN |Address of dsname buffer. 


{The format of the dsname buffer is as 
| follows: 


| Byte Contents 

}0-1 The length, in bytes, of the 
dsname. 

2-45 The dsname, left justified, and 
padded to the right with blanks. 


jaa 
N 
©) 
les) 
j=! 
ct 


DA OSCTL settings as follows: 


Meaning when on 
Reserved(0). 

Prefix userid to dsname. 
Reserved (0). 


Fe 


{ 
~] - 


DAOX UID 


Wh) © 


Reserved (0). 


(Continued ) 


ee ee i ee ee ee gee ee gee ee ee =m =p 
= 
fe) comes: cue SE ee ee Sg ee ee ee ee ee ee ee es ee eee ee ee ee a er ee 


fe ee ce ee oe 
ee 
rw) 
ct 
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| Displacement| Field {Size in| 

| Dec. Hex. | Name {Bytes | Contents 

}------------ $---------- }-------}-------------------------------------- 
[15 F | DAOYDSO { 1 [Returned when dsname is currently 

| | | {allocated in DSE bit settings that 

{ | | [indicate the organization of the data 
l | | |set, as follows: 

| | | 

| | | |Bit Meaning when on 

| | | | 0 Indexed sequential (IS). 

| | | J1 Physical sequential (PS). 

| | | | 2 Direct organization (DO). 

| | | [3-5 Reserved(0). 

| | | | 6 Partitioned organization (PO). 

| i | \7 Unmov eable. 

pe eee ae eee WS a y eae eer SR a Aaa a a a J 
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a 


DAIR PARAMETER BLOCK, CODE X‘'08* (DAPBO8) 


Size: 84 bytes. 

Located in: Subpool 1 

Constructed By: Calling program. 

Updated by: DAIRO8, USERID, SEARCH. 

Used by: DAIRO8, USERID, SEARCH. 

Contents: Addresses and control information for DAIRO8. 
---- 1 
| Operation| 
[Diagrams | 
| 20 | 

a a a Na a pe a a | 

{Displacement |Field [Size a | 

| Dec. Hex. | Name |Bytes | Contents | 

}~----------- t---------- }-------}------------------------------------- 4 

| 0 0 | DAO8CD | 2 [Entry Code X‘008°. | 

| | | | 
| 2 2 | DAO8FLG | 2 |Flags set on return, as follows: | 
| | | | | 
| | | |Bit Meaning when on | 

[ | [ | 0 Data set allocated but secondary | . 

[ | [ | error occurred. Register 15 | 

[ : j | contains error return code. | 

| [ | | [ 

| | | {1-15 Reserved (0) | 
| | l | [ 
| 4 4 [DAO8DARC | 2 [Error return code from dynamic | 
| [ | | allocation routines | 
| | | | 
| 6 6 [DAO8CTRC | 2 | Error return code from catalog | 
| | | |management routines | 
| [ | | 
|8 8 |DAQO8PDSN | 4 JAddress of dsname Buffer. The format | 
| ; | [of the dsname Buffer is as follows: | 

l | | | | 

I | { i Byte Contents | 

| | | |O-1 The length, in bytes, of the | 

i { | ; dsname. | 

| | | | | 

| | { {2-45 The dsname, left justified, and | 

{ | i | padded to the right with blanks. | 

| | { | | 

J12 Cc | DAO8 DDN | 8 |ddname for the data set, padded to the| 

{ | | [right with blanks. If a specific | 

| | | | ddname is not required, this field | 

| | | {must contain 8 blanks; the ddname to | 
| j i |which the data is allocated will be | 
| | | |placed in this field. [ 

{ | | | | 

| 20 14 |DAO8UNIT | 8 ase Name desired. | 

ae re Ea a a ee | 
(Continued) 
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Ces A eo oe Aga a a aa aa 1 
| Displacement |Fieid |Size in| | 
| Dec. Hex. | Name |Bytes | Contents i 


}------------ +---------- 
1c DAO8SER 


8 |Serial mamber desired. Only the first 
|6 pytes are significant. 


NO 
c 


| If the serial number is less than 6 
[bytes it must be padded to the right 
[with blanks. If the serial number is 
Jomitted, the entire field must contain 
| blanks. 


| 
| 
| 
| 
| 
| 
| 
| | 
4 | Block size requested. The average | 
| 
| 
| 
| 
| 
| 
| 
| 


WJ 
an 


24 
[record length desired. 
| 

4 |Primary space quantity desired. The 
{high order byte must be zero, the low 
{order three bytes contain the space 
| quantity desired. If the quanity is 
jJomitted, the entire field must be set 
|to zero. 

4 reer Space quantity desired. The| 
[high order byte must be zero, the low | 
|order three bytes contain the space | 
|lquantity desired. If the quantity is 
jomitted, the entire field must be set 
[to zero. 
| 

4 {Directory quantity desired. The high 
jorder byte must be zero, the low order 
[three bytes contain the number of 
| Directory blocks desired. If the 
[quantity is omitted, the entire block 
| field must be set to zero. 


£ 
© 


28 DAO8POTY 


£ 
é 


2c 


£ 
je ¢) 


Ul 
N 


34 DAO8 MNM 8 {Member name Of a partitioned data set. 
{If the name has less than 8 
| characters, it must be padded to the 
|xright with blanks. If the name is 
|omitted, the entire field must contain 


|blanks. 


8 paseeers for the data set. If the 
|password has less than 8 characters, 
Jit must be padded to the right with 
|blanks. If the password is omitted, 
jthe entire field must contain blanks. 


oa) 
>) 


3C DAO8PSWD 


On 
& 


4h DAO8DSP1 1 }Bit settings that indicate the status 


J}of the data set, as follows: 


Bit Meaning when on 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 
| 
30 |DAO8DOTY 
l 
| 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 0-3 Reserved (0) 
| DAO8SHR 4 SHR 
| DAO8 NEW 5 NEW 
| DAO8MOD 6 
7 


| DAO8OLD 


MOD 
OLv 


1 | Bit settings that indicate the normal 
[disposition of the data set, as 
| Follows: 
eee OI a ree Fk 
(Continued) 


| 
69 45  |DAO8DSP2 


ee re es es ee oe os ee ee ee ee oe oe ee ee es ee ee ae ae ee ee ee ee ee ee aS 8 = 
ec ee i ee ee ee ee es ee ee ee en ee ee ne es nes ee 
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oo ey ee ii Sa Reena 2 Sa a 
| Displacement| Field }Size in 
| Dec. nex. |Name | Bytes 


—+4 
l 
| 
| 
l 
l 
| 
| 
| 
l 
{ 
l 
l 
l 
] 
! 
| 
! 
| 
l 
| 
l 
l 

al 


Contents 


Bit Meaning when on 
-3 Reserved (0) 


KEEP 


0 
| DAO8KEEP 4 
5 DELETE 
6 
7 


| DAO8 DEL 
| DAOSCAT CATLG 


UNCATLG 


~] 
—) 


46 DAO08 DS P3 Bit settings that indicate the 
abnormal disposition of the data set, 


as follows: 


to 
ue 
(Tt 


Meaning when on 
Reserved (0) 


KEEP 
DELETE 
CATLG 
UNCATLG 


| 


t 
WW 


| DAO8KEP 

| DAO8 DELE 
| DAOSCATL 
| DAOSUNCT 


| 
47 |DAO8CTL 


AUS © 


~J 
- 
to 


it settings that control the 
perations to be performed by DAIR, as 
Ollows: 


Hh O 


to 
ple 
ct 


Meaning when on 

Specifies the type of units 
desired for the space parameters, 
as follows: 

°01°B units are in average block 
length 

°10°B units are in TRKS 

*11°B units are in CYLS 

Prefix userid to dsname 

RLSE is desired 

Data set is to be permanently 
allocated; not be unallocated 
until specifically requested. 
DUMMY data set is desired. 
Attribute list is supplied. 
Reserved (0). 


7 
j= 


| DAOSBLK 
| 


| DAO8TRKS 
| DAO8 CYLS 
| DAO8UID 

| DAOSRLSE 
| DAOSPERM 


| 
| DAOSDMMY 
| DAOS AT RL 


& WN 


nw 


~l 
tN 
— 
© 


Reser ved (0) 


~J 
wn 
£ 
ee) 


Bit settings on return that 
indicatethe organization of the data 
set, as follows: 


ee] 
p> 
ct 


Meaning when on 
Indexed sequential (IS) 


Physical sequential (PS) 
Direct Organization (DO) 
Reserved (0) 

Partitioned organization (PO) 


aa 


» ou 
wn 


ttribute list name. 


pee ce ce er ce ec ee ce ce ee ee ee ee ee ee ee ee ee ee a ee ee i — ee ee ee ee ee ee ee ee ef 
ems es re es ee gee ees ee ee ee ee ee eee ee ee ee ee ee oe ee 2 ED qeey ee e e ees e GE Cee ee eee = gee ees ee ope ee es ee ce cr rr ee en ah = 
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DAIR PARAMETER BLOCK, CODE X‘OC‘ (DAPBOC) 


Size: Variable -- 12 bytes as shown below, plus 8 
bytes .for each DDNAME to be concatenated. 


Located in: Subpool 1. 

Constructed by: Calling program. 

Updated by: DAIROC. 

Used by: DATROC. 

Contents: Addresses and control information for DAIROC. 
CS ee 
| Operation| 
[Diagrams | 
| 20 | 

(=e SESS oe ee Wee So eae ee ee ee aaa aaa 

| Displacement| Field |Size in| H 

| Dec. Hex. | Name |}Bytes | Contents ; 

|------------}---------- t------- }------~-------------—----------------- { 
| o 0 | DAOCCD | 2 | Entry Code X'0C’. | 
| | | | | 

[2 | DAOCFLG | 2 [Reserved (0). [ 

| | | 

[4 rT) [DAOCDARC | 2 | Error return code from dynamic [ 

| | | jallocation. [ 

| | | | | 
| 6 6 [s=s=-=+- | 2 |Reserved (0). | 
| | | | | 
| 8 8 |DAOCNUMB | 2 |Number of data sets to be [ 

[ | [ | concatenated. [ 

| | | | | 

{10 A | | 2 |Reserved (0). [ 

| | | | 

{12 | DAOCDDN | 8 {ddname of first data set to be | 

| | | | concatenated. | 

| | | [ | 
|- | - | | | 
|- | | | | 
| | l | | 
bse [3 |. {|ddname of last data set | 
|. |. j - jto be concatenated. { 
Bes pane eee ee fees a es ae J 
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DAIR PARAMETER BLOCK, CODE X‘'10° (DAPB10) 


Size: 16 bytes. 

Located in: Subpool 1. 

Constructed by: Calling program. 

Updated by: DAITR10. 

Used by: DAIR10. 

Contents Addresses and control information for DAIR10. 
Seeeaea a earn | 
| Operation| 
|Diagrams | 
}-—-—--- 
{| 20 | 

naa 7 aa: fees Sea Se a eee sa oleate { 

| Displacement| Field [Size in| | 
| Dec. Hex. | Name [Bytes | Contents [ 

[--—-------- {-~-----—- t------- $--—-—-—----——----------—-------—---- ' 

[0 0 | DAIOCD | 2 | Entry code X*'Q010'. | 

| | | | | 

[2 2 | DAIO FLG | 2 |Reserved (0). | 

| | | | 

| 4 4 JDAIODARC | 2 |] Error return code from dynamic | 
| | | jallocation routines. | 
| | | | | 
| 6 6 [ | 2 |Reserved (0) | 
| | | | | 

18 8 | DAIODDN | 8 |ddname of data set to be | 

| | | | deconcat enated. i 

eRe yore eee jee pera ae eee spare eee eee Ms 8 Si a ee eee J 


a 
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DAIR PARAMETER BLOCK, CODE X*14" (DAPS14) 


size: 16 bytes. 

Located in: Subpool 1. J 

Created by: Calling program. 

Updated by: DATR14, USERID, IKJEHCIR. 

Used by: DAIR1i4, USERID, IKJEHCIR. 

Contents: Address and control information for DAIR14. 
foo 1 
| Operation | - 
[Diagrams | 
anaes amaieicalas { 
| 20 | 

fe ere 2 Le Poo ee re eee ae 1 

| Displacement|Field jSize in| [ 

|Dec. Hex. |Name {Bytes | Contents | 
fos Sosa See e +f Sess aes sexta ee mead qs ee ea See ae See ee | 
| 0 0 | DA14CD | 2 [Entry Code X*0014°. | 
| | | | | 
| 2 2 | DA1L4FLG | 2 | Reserved (0). | 
| | | 
| 4 i | DA14DSN | 4 jAddress of the dsname Buffer. The | 
| | | | format of the dsname Buffer is as | 
| | | | follows: | 
| | | | | 
| | | [Bit Contents | 
| ; { {0-1 The length, in bytes, of the | 
| ; | ; dsname. { 
| | | | oe | 
| | }2-45 The dsname, left justified, and | 
| | | | padded to the right with blanks. | 
| | | | | 
| 8 8 |DA14PRET | 4 JAddress of the return area in which | 
| | | jare qualifiers for the dsname are | 
| | | Jplaced. The format of the return area| 
| | | [is as follows: | 
| | | | 
| | | | Byte Contents | 
| | | 0-1 The length, in bytes, of the | 
| | | | return area. | 
| | | | | 
| | | 2-3 Reserved (0). | 
| | | | | 
| | | {4-11 First Qualifier (or 0, if none) | 
| | | l | 
| | }12-19 Second Qualifier (or 0, if | 
| | | | none). Etc. | 
| | | | | 
J12 Cc |DA14 CTL | 1 | Bit settings that control DAIR | 
| | { | Operation, as follows: | 
| | | | | 
| | | |Bit | Meaning when on | 
| | | | O-1 Reserved (0). | 
| | DALYULD | | 2 Prefix userid to dsname. | 
| | | [3-7 kKeserved (0). | 
| | | | 
{13 D LS eees= | 3 | Reserved (0). | 
set pe ede, A pe ato a eee ere ee Die ct Se est cea cs a a a en hot J 
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DAIR PARAMETER BLOCK, CODE X‘'18" (DAPB18) 


Size: 40 bytes. 
Located in: Subpool 1. 
Created by: Calling program. 
Updated by: DAIR18, USERID, SEARCH. 
Used by: DAIR18, USERID, SEARCH. 
Contents: Address and control information for DAIR18. 
|Operat ion| 
{Diagrams | 
| 20 t 
Sek Sa Ee SSO Ta ee 
|Displacement| Field |Size in| i 
| Dec. Hex. |Name [Bytes | Contents | 
|------------+---------- t------- }-----------—-------------------------- ' 
{0 0 | DA18CD | 2 | Entry Code X‘'0018°. | 
| | | 
[2 2 | DA18 FLG | 2 | Flags set on return, as follows: [ 
| | | | | 
[ f [ [B Meaning when on | 
| | | ion Data set freed but secondary - | 
| [ | | error occurred -- return code is | 
| | | | in RTCODE of DAWT. | 
| | | {1-15 Reserved (0). f 
| | | | | 
|4 4 |DA18DARC | 2 [Error return code from dynamic | 
[ { | [allocation routines. | 
l | | | | 
| 6 6 [DA1L8CTRC | 2 | Exror return code from catalog | 
| | | {management routines. | 
| | | | | 
[8 8 [|DA18PDSN | 4&4 {Address of the dsname Buffer. The | 
| | | | format of the dsname Buffer is as | 
| | | | follows: f 
| | | | | 
| | i [Byte Contents | 
| [ | |O0-1 The length, in bytes, of the l 
| | | | _ dsname. | | 
| | [ {2-45 The dsname, left justified, and | 
| [ | | padded to the right with blanks. | 
| | | | | 
[12 Cc | DA18 DDN | 8 |ddname of the data set to be [ 
| | | | unallocated. | 
| | | | 
{20 14 |DA18MNM | 8 |Membername of a partitioned data set. | 
| | | [If the name has less than 8 | 
| [ | |characters, it must be padded to the | 
| | { [|xright with blanks. If the password is| 
| | H jJomitted, the entire field must contain| 
| | | | blanks. { 
| | | | . l 
{28 16 |DA18CLS | 2 |SYSOUT class. An alphabetic or | 
i [ | jmumeric character. If SYSOUT is not | 
| | | Jspecified, this field must contain | 
| | | aca iaade | 
ee a ean Speen ee a et | a a a a di 


(Continued) 
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Pa a cr pe ee ee es en ee ee wae et ae ye ep es eye eg OE re tage, epee ang Ae ge ee gene 1 
| Displacement | Field {Size in| | 


| Dec. Hex .| Name jBytes | Contents | 
|------------4---------- j-------}---------------- +--+ 22 ---------------- 
30 18 {|DA18DSP2 1 | Bit settings that indicate the normal 
' |disposition of the data set, as 
| follows: 


Bit Meaning when on 


| { | 
| | 
| | | 
| | | | | 
| | | | | 
| | | }0-3 Reserved (0) | 
| | | | 4 KEEP l 
| | r | 5 DELETE | 
| | | | 6 CATLG | 
| l | |7 UNCATLG | 
| { | | | 
{31 19 |DAI8CTL | 1 |Bit settings that control DAIR | 
| | | |operations, as follows: [ 

| 
| | | [pit Meaning when on | 
| | i |/0-1 Reserved (0). [ 
| | | | 2 Prefix userid to dsname. | 
| i | {3 Free permanently allocated data | 
| | | | sets. (Mark “not in use* if the | 
| | | | bit is off.) i 
| | i {4-7 Reserved (0). | 
| | | | | 
{32 20 |DAI8JBNM | 8 {The jobname for enqueuing SYSOUT data | 
| | ; Jsets. if the jobname is omitted, the | 
| | i Lagmmene will be taken from the TIOT. | 
Rhone oe yee ne er ae a STERN ENE: Rr De nS Sen TO ee OI OM ee Jj 
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DAIR PARAMETER BLOCK, CODE X'1C* (DAPB1C) 


Size: 24 bytes. 
Located in: Subpool 1. 
Constructed by: Calling program. 
Updated by: DAIRIC, SEARCH. 
Used by: DAIR1C, SEARCH. 
Contents: Address and control information for DAIRIC. 
a aT 1 
| Operation | 
|Diagrans | 
|------ —] 
| 20 | 
Ene NGS Mem ere Get case pene © ee te eee ee ee pene ee area e new eee 1 
| Displacement |Field [Size in| [ 
| Dec. Hex. | Name |Bytes | Contents | 
}--————---——— $--——---—-- }------- +——-—---—------__----_--_-_-_---- — 
| 0 0 | DAICCD |} 2 JEntry Code X*001C’. | 
| | | | 
| 2 2 | DAICFLG | 2 |Reserved (0). | 
| | | | | 
| 4 4 |DA1CDARC | 2 [Error return code from dynamic [ 
i | [ | allocation routines. [ 
| | | | l 
[6 6 i | 1 |Reserved (0). | 
| | | | 
\7 7 | DALCCTL | |Bit settings, as follows: [ 
| [ | |Bit Meaning when on [ 
| | ; }0-3 Reserved (0). | 
| | DA1CPERM | {4 Allocate permanently. { 
| [DAICATRL_ | [5 Attribute list is supplied. [ 
| H | [6-7 Reserved (0). | 
| | | | | 
[3 8 | DA1 CDDN | 8 |ddname for the data set to be [ 
| | | Jallocated to the terminal | 
| | | | | 
{16 10 |DA1CALN | 8 jAttribute list name. ; 
Be A fe ae ene reas y ene separa ae 5 ie a ne nn gen oe eae npg I 
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DAIR PARAMETER BLOCK, CODE X* 24° (DAPB24) 


Size: 84 bytes. 

Located in: Subpool 1. 

Created by: Calling program. 

Updated by: DAIRz<4¥, DAIRO8, USERID, SEARCH. 

Used by: DAIR24, DAIRO8, USERID, SEARCH. 

Contents: Addresses and control information for DAIR2&4. 
eet 
|Operation| 
[Diagrams | 
a 
| 20 | 

(>= Ge Te ee ee ae a 1 

| Displacement| Field [Size in| [ 

| Dec. Hex. | Name |Bytes | Contents [ 
p= S==-====-= 1. 2-=>=—=- t--===—— fa a SS = SS { 

ee) 0 | DA24CD | 2 [kntry Code X'0024'. f 

l | | | 

{2 2 | DA24 FLG | 2 |Flags set on return as follows: | 

| | | | | 

| | | |Bit Meaning when on | 
| | | {0 Data set allocated but secondary | 
| : { | error occurred. Register 15 | 

[ ; | | contains the error return code. | 

4 | | {1-3 Reserved (0). | 

| | | {4 ddname requested is allocated as | 

( | | | DUMMY. | 

| | | [5-15 Reserved (0). | 

| | l | | 
|4 7) [DA24DARC | 2 | Error return code from dynamic | 
| | | jallocation routines. { 
| | | | | 
| 6 6 |DA24CTRC | 2 [Error return code from catalog | 
| [ ; management routines. | 
| | | | | 

[8 8 [|DA24PDSN | 4&4 {Address of dsname buffer. The format | 

[ | | {of the dsname buffer is as follows: | 

| | { | | 

| | | |Byte Contents | 
| [ | [O-1 The length, in bytes, of the | 
| | { dsname. | 
| | | |2-45 The dsname, left justified, and | 
| { | | passed to the right with blanks. | 
| | | | | 
ji2 Cc | DA24 DDN | 8 |ddname of data set to be allocated. | 
| | | | (Required) ; 
| | | | 

{20 14 |DA24UNIT | 8 JUnit name. If the unit name is less | 

| | { {than 8 bytes, it is padded to the { 

| [ | {right with blanks. | 

es at Danan arpa eerie a aay EEE, Sg RO OOD i NPR ae AE Re SE PO a J 


(Continued) 


308 OS/VS2 Terminal Monitor Program (VS2 Release 1) 


| Reite tS Pa e ae ie ace eas a = eas ee ee et 7 


Displacement|Field |Size in| | 
( . | Dec. Hex. |Name [Bytes | Contents | 

}------------ +~---------- }-—----}-------------------------------------- 

28 1C |DA24SER 8 }Serial number. Only the first 6 bytes| 
Jare significant. If the serial number | 
Jis less than 6 bytes, it must be { 
| padded to the right with blanks. If 
Jthe serial number is omitted, the 
Jentire field must contain blanks. 

36 24 DA24BLK i {Block size requested. The average 
|xrecord length desired. 
| | | | 

40 28 DA24 PQOTY 4 [Primary space quantity desired. The 


Jhigh order byte must be zero, the low 
jorder three bytes contains the space 
|quantity desired. If the quantity is 
jomitted, the entire field must be set 
|to zero. 
| 
4 |Secondary space quantity desired. The 
jhigh order byte must be zero, the low 
Jorder three bytes contain the space 
|quantity desired. If the quantity is 
jomitted, the entire field must be set 
jto zero. 


Ky 2C DA24SOTY 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

a 
4g 30 DA2WDOTY | 4&4 {Directory quantity desired. The high - 
| Jorder byte must be zero, the low order 
{ jthree bytes contain the number of 
H {Directory blocks desired. If the 
| |quantity is omitted, the entire block 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
l 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
L 


8 [Membername of a partitioned data set. 
| If the name has less than 8 
|characters, it must be padded to the 
|xight with blanks. If the name is 
jJomitted, the entire field must contain 
| blanks. 
| 

8 {Password for the data set. If the 
|password has less than 8 characters, 
jit must be padded to the right with 
jblanks. If the password is omitted, 
{the entire field must contain blanks. 

1 [Bit settings that indicate the status 
jof the data set, as follows: 


52 34 DA 24MNM 


60 3C DA24 PSWD 


68 44 DA24DSP1 


& 
> 
tt 


Meaning when on 
Reserved (0). 


SHR 


| 


t 
WwW 


| DA24SHR 
| DA24NEW 
| DA24MOD 


| DA24OLD 
| RR ane meee par ae Prey ear See ee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[field must be set to zero. | 
| 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[ 


fos cae ce a ee 
AMES © 
a 
=, 


: 
| 
| 
i 
| 
| 
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De on Ta ee De ape Ne RD Tee ge Ie Ng Tg Pee, 1 
| Displacement| Field |Size in| | 
| Dec. Hex. | Name |Bytes | Contents [ 


1 = |Bit settings that indicate the normal 
| disposition of the data set, as 
| follows: 


Bit Meaning when on 

-3 Reserved (0). 

| DA2ZUKEEP 4 KEEP 
| DA24DEL 
| DA24 CAT 
| DA24UCAT 
| 

70 46 |DA24DSP3 Bit settings that indicate the 

abnormal disposition of the data set, 

as follows: 


w 
pple 
ct 


Meaning when on 
Reserved (0). 


| 


! 
W 


| DA24 KEP 

| DA24DELE 
| DA24 CATL 
| DA24UNCT 


WAU LS O 
0 
: 
er 
i 


| 
71 47 |DA24SCTL Bit settings that control the 


Operations to be performed by DAIR, as 


eh 
2) 
— 
_ 
5 
) 


jes) 
aed 
cr 


Meaning when on 
Specific the type of units. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
! 
desired for the space parameters, | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 


i 
_ 


as follows: 

*01°B units are in average block 
length. 

*10°B units are in TRKS 

"11°B units are in CYLS 
Prefix userid to dsname 

RLSE is desired 

Data set is to be permanently 
allocated: not be unallocated 
until specifically requested. 
DUMMY data set is desired. 
Attribute list supplied. 
Reserved (0). 


| DA24 BLK 


| 

| DA2Z4TRKS 
| DA24CYLS 
|DA24 UID 
| DA24RLSE 
| DA24 PERM 


| 
| DA24 DMMY 
| DA24ATL 


EW 


num 


Reserved (0). 


Bit settings on return that indicate 
the organization of the data set, as 
follows : 


jes) 
fate 
Ct 


Meaning when on 
Indexed Sequential (IS) 


Physical Sequential (PS) 
Direct Organization (DO) 
Reserved (0) 

Partitioned Organization (PO) 
Unmoveable 


| 


ate 
Ww 


Attribute list name. 


a se en we se ee we wn an es en 


a nn a ee nnn rn nnn ns ne ann ss ses 
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DAIR PARAMETER BLOCK, CODE X'28" (DAPB28) 


Size: Variable -- 8 bytes as shown below, plus 4 
bytes for each operation to be performed. 


Located in: Subpool 1. 
Created by: Calling program. 
Updated by: DAIR28. 
Used by: DAIR28. 
Contents: Addresses and control information for DAIR28. 
| Operation | 
|Diagrans | 
| 20 | 
(o=== == {2 = Sb, ase a a aa = 
| Displacement |Field |Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
}------------ {—--—-—~-~}-—---—— {—-—-—----~-~----—----—----—------ — 
0 0 | DA28CD 2 [Entry code X*0028". 
| | | 
2 2 | DA28NOP 2 [Number of operations to be performed. 
| 
4 4 | DA2Z8PFOP 4 [Address of DAPB for first operation 


[that fails. (Zero if all operations 
jare successful.) Register 15 contains 
|error return code. | 
8 8 


DA28OPTR & | Address of DAPB for first operation. 


aoe ee Gee gees = gee —_— ee ee ee oe oe of 


| 

|. 
|. 
|: 
|DA2Z8O0PTR | 4&4 [Address of DAPB for last operation. 


i I a dk ee ee ee a eee ee ee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
t 
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DAIR PARAMETER BLOCK, CODE X"2C" (DAPB2C) 


Size: 16 bytes. 

Located in: Subpool 1. 

Constructed by: Calling program. 

Updated by: DAIR2C. 

Used by: DAIR2C. 

Contents: Addresses and control information for DAIR2C. 
ecaa atasae raga 
|Operation| 
|Diagrams | 
| 20 | 

— Mo Se foe eee Po { 

| Displacement | Field |Size in| i 

| Dec. Hex. | Name [Bytes | Contents | 

ie rine ese eae Wa a eee t 

| 90 0 | DA2CCD | 2 | Entry code X‘'002C' ; 

i | | 

|2 2 | DA2 CFLG | 2 | Bit settings as follows: | 

| i | | | 
| | ; | Setting Meaning [ 
| | | |x*O2° Mark all DSEs allocated by the| 
| | | | ancestors of the current task, | 
| | | | and by the initiator, as “not | 
| | [ | in use®. | 
| | i |x°O1° Mark the DSE for the specified | 
| | | ; ddname as “not in use”. | 

; f | |x*00° Mark all the DSEs that have a | 

A | H | supplied TCB address as "not | 

i | | | in use". | 

| | | | | | 

| 4 4 | DA2ZCTCB | 4 | Address of the TCB for the routine | 

; | | [whose data sets are to be marked “not | 

{ | | [in use”. | 

| | | | | 

{8 8 | DA2CDDN | 8 | ddname for DSE entry to be marked “not| 

[ | | jin use". 

eee eae rena ee jn eee eaee ae fete es te aa ee ee ee eet J 
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DAIR PARAMETER BLOCK, CODE X'30° (DAPB30) 


Sizes 72 bytes. 
Located in: Subpool 1. 
Constructed by: Calling program. 
Updated by: DAIR30. 
Used by: DAIR30. 
Contents: Addresses and control information for DAIR30. 
(Operation| 
[Diagrams | 
| 20 | 
a eS a aa a a yo -- ~------ --- --- --—-- +--+ --1-_-------{ 
|Displacement |Field [Size in| [ 
| Dec. Hex. | Name [Bytes | Contents | 
j}——-----~---- $----------$------- $-------------- Bonen nnn nnn nn 4 
0 0 | DA30CD 2 [Entry code X*0030". 
| 
2 2 | DAZOFLG 2 [Flags set on return, as follows: 


it Meaning when on 
Data set allocated by secondary 


error occurred. Register 15 

contains error return code. 
}/1-15 Reserved (0). 
| 

2 |Error return code from Dynamic 
{Allocation routines. 


P 
P 


| 
2 |Reserved (0). 


a 
an 


co ©) 
fe] 


DA30PDSN u {Address of dsname buffer. The format 


[of the dsname buffer is as follows: 

| 

| Byte Contents 

|O-1 The length, in bytes, of the 

i dsname. 

[2-45 The dsname, left justified, and 
| padded to the right with blanks. 
| 


DA30DDN 


a 
NO 
Q 


8 |ddname for the data set. If a 
[specific ddname is not required, this 
|field must contain 8 blanks; the 
| ddname to which the data is allocated 
{will be placed in this field. 


| 
14 8 {Unit Name desired. 


|S) 


A3ZOUNIT 


wm NHN 
o oo 


ic A30SER 


5 


8 [Serial number desired. Only the first 
|6 bytes are significant. 
jIf the serial number is less than 6 
| bytes, it must be padded to the right 
Jwith blanks. If the serial number is 
Jomitted, the entire field must contain 
PIS: 
~~ he ae ee oe di 
(Continued) 


ee re ee = 


pe es eee ce ee ee ee ee ee ee i 


Pe ae ee eee ee gee GE gee GS ee Oe ee ogee ee og Se es ee ge = we Oe es Se og Oe ee ees Oe es Se oe OS ae 
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Meteaiaesacn ide Oe eg ee ee 7 


T 
Displacement| Field {Size in 
|Dec. Hex. | Name | Bytes 
{------------ $---------- }------- 
| 36 24 |DA30BLK j 4 
| | | 

| | 
[40 28 |DA30PQTY | 4&4 
| | | 

| | | 

| | 

| | | 

| | 

| | | 
pau 2c |DA30SOTY | 4 
| | | 

| | 

| | | 

| | | 

| | | 

| | 
[48 30 |DA30PGNM | 8 
| | | 

| | | 

| | | 

| | | 

| 56 38 |DA30FORM | 4 
| | | 

| | | 

| | | 

| | 

| | | 

| | | 
{60 3C |DA30CLS | 2 
| | 

| | | 

| | | 

| | | 

{ | | 

| | | 
{62 SE. [reeseees I) 2 
| | | 

| 63 3F |DA30CTL i 1 
| | | 

| | | 

| | 

| | 

| | | 

| | | 

| | | 

| |DA30ABLK | 

| | 

| |DA30TRKS | 

| |DA30CYLS | 

| | DA30UID 

| |DA30RLSE | 

| |DA30PERM | 

| | 

| | | 

| | DA3ODMMY | 

| [DA3O0ATRL | 

| | | 

| | 

| 64 4QO |DA30ALN ) 8 
ih es ores Leena aera | Genie nee ee 


| Contents 


[Block size requested. The average 
{record length desired. 

ete Space quantity desired. The 
[high order byte must be zero, the low 
[order three bytes contain the space 
[quantity desired. If the quantity is 
|omitted, the entire field must be set 
{to zero. 

| 
|Secondary space quantity desired. The 
jhigh order byte must be zero, the low 
jorder three bytes contain the space 
|quantity desired. If the quantity is 
Jomitted, the entire field must be set 
{to zero. 

| 
| Programname-The member name of a 
|special user program to handle SYSOUT 
| operations. This field must be blanks 
Jif this parameter is omitted. 

| 
|Form Number-indicates that the output 
|should be printed or punched on a 
[specific output form. It is a four 

| character form number. This field 
|must be blanks if this parameter is 

| omitted. 


jcharacter (0-9, A-Z). Note: The 

| SUBMIT command processor passes the 
| SUBMIT queue number rather than a 
|SYSOUT class to have its data sets 
| placed in the proper queue. 


|Reserved (0) 
| 
| Bit settings that control the 

Joperations to be performed by DAIR, as 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| | 
|SYSOUT class - A single alphameric | 
| 
| 
l 
| 
| 
[ 
| 
| 
| follows: | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


|Bit Meaning when set 

[0-1 Specifies the type of units 

| desired for the space parameters, 
| aS follows: 

| °01i'B units are in average block 
| length 

i "10°B units are in TRKS 

| *11°B units are in CYLS 

| 2 Prefix userid to DSNAME 

| 3 RLSE is desired 

|4 Data set is to be permanently 

| allocated; not be unallocated 

[ until specifically requested. 

[5 DUMMY data set is desired. 

| 6 Atribute list name supplied. 

| 7 Reserved. 

| 

JAtribute list name. 

a ee ee ee J 
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DAPB34 - DAIR PARAMETER L 


Size: 
Located in: 


Constructed by: 


IST 


20 bytes. 
Subpool 1. 


IKJEFATT; NAMECK Validity Checking Routine. 


Used by: DAIR34. 
Contents: Addresses & control information for DAIR34. 
ty rar ee Ss ea Ta eo a a ee ee ee eS 1 
| Displacement|Field {Size in| (| 
| Dec. Hex. | Name [Bytes | Contents [ 
------------ }----------}-~-----}-------------------------------------+| 
ie) 0 | DA34CD | 2 j|Entry code X‘'0034'. | 
| | | | | 
| 2 2 | DA34FLG | 2 |Flags. | 
| | DA34FIND| |Bit O on, attr-list-name found. | 
| | | [Bits 1-7 reserved. i 
| | | | { 
[4 4 [|DA34DARC | 2 |Return code from dynamic allocation. | 
| | | [ 
| 6 6 [DA34CTRL | 1 [Function to perform: [ 
| | DA34SRCH| | Bit O on, search for name only. | 
{ | DA34CHN | | Bit 1 on, chain an ATRCB. | 
{ | DA34UNCB| | Bit 2 on, unchain AIRCB. | 
| { | | Bits 3-7 reserved. "| 
| [ { | I 
|7 7 |------- j; 1 | Reserved. | 
| | | 
{8 8 |DAS4NAME | 8 [| Attr-list-name. { 
l | | l | 
{16 10 |DA34ADDR | & j| Address of DAIRACB. | 
ee ee ees [ a ne Ba aes ee a ee =e 
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315 


DATA SET EXTENSION BLOCK (DSE) 


> 
S1ze: Varialbe. J 


Location in Subpool 2259.6:° 

Created by: MVT Job Management. 

Updated by: MVT Dynamic Allocation routines -- SVC 99. 
Used by: SEARCH. 

Contents: Information about data sets including ddnames 


and dsnames. 


fa 1 
| Operation| 
{Diagrams | 
| 20 | 
Pee ee {oe iy erealarsaat ees Tee ee ST eT ee Sees = | 
| Displacement|Field {Size in| | 
| Dec. Hex. |Name {Bytes | Contents [ 
faSs5 2-5-5 ==={-=-— === [ena ne Ce asa Eee 3 
ae 0 |DSEFORWD_ | y {Address of next DSE. (0 inthe last | 
| | | | DSE.) | 
| | | | | | 
[4 4 {[DSEBCKWD | 4 | Address of last DSE. (O in the first | 
| | | | DSE.) | 
| | | | . | 
{8 8 |DSEBLKSZ | 2 |Length in bytes of DSE [ 
| | | [ | 
{10 A | DSESTAT | 1 JAllocated status of the data set, as _ | = 
| | | | follows: [ 
j i | }Bit Meaning when on | 
| | | {0-3 Reserved | 
| | *| [4 DSE SHR l 
‘| | | [5 DSE NEW | 
| | | | 6 DSE MOD 
| | ( }7 DSE OLD { 
l | | | . a | 
J11 B {|DSECNTRL | 1 [bit settings that indicate the status | 
| | | {of the data set, as follows: [ 
| | | [Bit Meaning when on | 
| | DSEDYN | me) Data set allocated dynamically. | 
| | | | | 
[ |DSENUSED | }1 Data set not in use. | 
i | | | 
| | DSEMEM | [2 The DSEMEMBER field is present in| 
| | | | this DSE. | 
| | | | . | 
[ {DSEDTIOT | 13 TIOT entry is DYNAM. | 
| | | | | 
| | DS ECON | | 4 Data set was concatenated | 
| | | | dynamically. | 
| | | | | 
| [===<==—= | [5 Reserved (0) use. | 
t | i | | 
| | DSEPERM | | 6 Data set iS permanently | 
| | | | allocated. | 
| | | | | 
{ (=< S=<—= f |7 Reserved (0). | 
a oe me ee ae 5 eee eS Does ee hc Ng es ee eee J ; ) 


(Continued) 
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eS 5 a ann 1 ana 
|Displacement | Field 

| Dec. Hex .|Name 
eee: ee eee 
{12 Cc | DS EDDNAM 
| | 

| 20 14 |DSETCBAD 
| | 

| | 

| 24 18 |DSETTRPW 
| 

| | 

| | 

| | 

| | 

| | 

[28 1C |DSENDISP 
| | 

| | 

| | 

| 

| | 

| 

[ | DS EK EP 

| | 

| | DS EDEL 

| | 

i | DS ECAT 

| | 

| | DS EUCAT 
l | 

[29 ID |DSEADISP 
| | 

| | 

| | 

| | 

| | 

| | 

| 

| 

; | 

| | 

{30 1E |DSEDSORG 
| | 

| | 

| | 

| 

| | DSEIS 

| | 

| | DS EPS 

| | 

{ | DS EDO 

| | 

| | 

| | 

| | DS EPO 

| | 

| | DS EU 

i ea ee ee 


: Fa a aa a aR aa aR a a SR 1 
{Size in| | 
Bytes | Contents | 
Seasons $a rr rf 

| 8 ddname as found in TIOT | 
| | 
[4 Address of the TCB for the | 
H routine which requested dynamic | 
f allocation. | 
4 {The relative TTR of the password for | 
[this password protected data set | 
jwithin the password data set (0 if | 
|data set is not password protected or | 
junit password TS entered from the | 
jterminal). | 
| | 
1 |Bit settings that indicate the normal | 
|disposition of the data set, as | 
| follows: | 
| | 
|Bit Meaning when on | 
}0-3 Reserved (0). { 
| | 
[4 KEEP | 
| | 
{5 DELETE | 
| | 
| 6 CATLG | 
| [ 
| 7 UNCATLG | 
| | 
1 |Bit settings that indicate the | 
Jabnormal disposition of the data set, | 
jas follows: | 
| | 
|Bit Meaning when on . | 
{0-3 Reserved (0). i 
| 4 KEEP | 
[5 DELETE | 
| 6 CATLG | 
{7 UNCATLG | 
| | 
1 | Bit settings that indicate the | 
Jorganization of the data set, as | 
| follows: | 
l | 
|Bit Meaning when on | 
| 9 Indexed Sequential (IS). | 
| | 
[1 Physical Sequential (PS). | 
| | 
| 2 Direct Organization (DO). | 
| | 
{3-5 Reserved (0). | 
| | 
| 6 Partitioned Organization (PO). | 
| | 
|7 Unmoveable. | 
nett nrae ae a a a aa eee Fy 


(Continued) 
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rT 
iDisplacement |Field |Size in| | 


| Dec. Hex .| Name }Bytes | Contents | 
[---------~-- $---------- $------- fo------2---------=-------------------- { 
| 31 1F |DSEDSLNG | 1 |Length in bytes of the dsname. l 
| | | | | 
[32 20 |DSEDSNAM | 1-44 |dsname for the data set. | 
| | | | 
| |DSEMEMBR | 8 |The name of a member of a partitioned | 
| | | |data set. (This field is present only| 
| | | | for partitioned data sets and only 
| | | |when the DSEMEM bit is set in | 
| | l | DSECNTRL. ) | 
Pas Seer ene eee ene | een Sed eee So J 
DAIR PARAMETER LIST (DAPL) 
S1ze: 20 bytes. 
Located in: Subpool 1. 
Created by: Calling program. 
Updated by: None 
Used by: IKJEFDOO. 
Contents: Parameter List for DAIR -- IKJEFDOO. 
ae eee 1 
[Operation 
}Diagrams | J 
{| 20 
~-~---------y---------- Porn r qn nnn =f 
| Displacement | Field |Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
|------------ }---------- }------- $-------------------~-~--------=------- ! 
[oO 0 | DAPLUPT } 4 jAddress Of user profile table (UPT). | 
| | | | | 
{4 4 | DAPLECT | 4 jAddress of environment control table | 
| | i | (ECT). | 
| | | | | 
{8 8 | DAPLECB {| 4 [Address of calling program's event | 
| | | [control block (ECB). | 
| | | | 
{12 Cc {DAPLPSCB j{ 4&4 | Address of protected step control | 
| | | {block (PSCB). | 
| | { | | 
| 16 10 |DAPLDAPB | 4 JeedEces Of DAIR parameter plock. | 
bose es Ms ee ek ee L J 


318 OS/VS2 Terminal Monitor Program (VS2 Release i) 


DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘'00' (DSE UPDATE 
PARAMETER LIST) 


$1ze: 64 bytes. 

Created by: IKJEFDOO -- DAIRO8, DAIR24, DAIR2C, DAIR3O. 
Updated by: SVC 99 DSE Update routines. 

Used by: Svc 99 DSE Update routines. 

Contents: Addresses and control information for the DSE 


UPDATE function as invoked by the DAIR2C 
function, only, to mark DSE blocks not in use. 
(Other functions enter DSE update processing 
with the function codes of SVC 99 functions 
whose execution makes subsequent DSE updating 
necessary.) 


fe 
| Operation | 


[Diagrams | 


SLE SA aaa eR ice) Sa a St ee 4 
| Displacement |Field |Size in| [ 
| Dec. Hex. | Name [bytes | Contents 


| 
1 |DSORG code returned from OBTAIN macro 
j instruction. 


| 
1 | Function code X*00' 


0 
| 

1 1 |OBTDSORG 
| 


| 
2  |FCODE 


Ww WN 


{ 
1 |Options. Bit settings, as follows: 
|Bit Meaning when on 
[0-5 Reserved (0) 
Mark DSE entries “not in use" 
except those created for the 
current task and its originating 
tasks. 
Mark a DSE entry “not in use". 
The address of the DSE entry is 
placed at offset 5 in this block. 


Jd 
° 
5 
rer 
‘e) 
a 


oN 


~] 


£ 
£ 


CONT ROL Bit settings, as follows: 
B 


Bit Meaning when on 

0-4 Reserved (0). 

5 Data set is permanently allocated. 
6-7 Reserved (0). 


Ee gue eee. GEE ee GEES Qe GEE gees Ge Gee GEE gee 


ea 
Wn 


TCBADD 3 {Address of the TCB for the task for 
|which the data set was allocated, or 
[| (if bit 7 in the options field is on) 
jthe address of the DSE entry to be 


jmarked “not in use”. 


| 
8 {The 8-byte password (if used), left 
| justified, padded to the right with 


PASSWORD 


ee ee ee oe 0 ee ee 0 ee Se ee oe Oe gee Oe eee ee ee eee = gee = gee oe eee ee ee 


a a ee 


— a ee oe ee ee ee ee ee oe oo oe ee ee ee ee es ee ee ee ee es ee se ee es ee es es a ee 
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Wer ee ee Pa er Pe ee 1 
| Displacement| Field {Size in| | 
| bec. Hex. | Name {Bytes | Contents ; 
i a er as 
[16 10 |PSWRDITR | 3 |The relative track address (TTR) of | 
| | | |the password in the password data set.| 
| | | | 
[19 13 |DSLNGTH } 121 {The length of the dsnane. | 
| | | | 
| 20 14 |DSNAME [| 44 |DSNAME for the data set, left justi- | 
| | [ | aneoe padded to the right with blanks. | 
es Pe te On a he J 
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DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X'‘O1' 


Size 
Created by: 
Updated by: 
Used by: 


Contents: 


po ee eae ee 
| Displacement |Field 

| Dec. Hex. | Name 
p--~---~-----4----------+ 
| 0 0 | PLNGH 

| | 

| | 

| 2 2 | PCODE 

| | 

\3 3 | POPTIONS 
| | 

| | 

| | 

| | 

| 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

[4 4 |PDDNM1 

| | 

| | 

{12 C [SRS SS aS= 
| | 

{13 D | PDDNM2 

| | 

| | 

| | 

}21 1S: [Sessa 
| | 

} 22 16 |PDISP1 

| | 

| | 

| | 

| | 

| | 

| | 

| 

| | 

Pe a Se yaa ae ae en ne 


Variable. 

IKJEFDO0OO -- DAIRO8, DAIR1IC, DAIR30. 
IGC26099. 

SVC 99 DATASET and DSE routines. 


Addresses and control information for the 
DATASET function of dynamic allocation. 


(Ss 1 

| Operation| 

|Diagrams |} 

{| 20,21 | 

Seek Le —y_—------------ --~--- ----------4--------- 

{Size in| | 
{Bytes | Contents | 
f-=====— Ne re a ee ee er { 
| 2 |Size, in bytes, cof the parameter | 
| | block. | 
| | | 
{ 1 | Function Code X‘'Q1°. | 
| | 
[ 1 | Bit settings as follows: | 
| | | 
| [Bit Meaning when set | 
| | 0 DUMMY data set. No device is to | 
| | be allocated. I/O operations are| 
| | to be bypassed. | 
| {1 Uncatalog the data set if | 
| | disposition is delete. | 
| | 2 TERM=TS data set. Special | 
| | BSAM/QSAM interface is to be set | 
| | up so that terminal can be used (| 
{ | as I/O device. | 
| | 3 dsname points to data set name. | 
| {4-7 Reserved (0). | 
| | 
| 8 |Current ddname for an unallocated, | 
| j unopened data set. | 
| | 
| 1 |Reserved (0). | 
{ | | 
| 8 |New ddname for the data set. It may | 
| {not be the ddname associated with any | 
| {|TLOT entries. | 
| | | 
| 1 jReserved (0). | 
| | | 
| 1 |Bit settings that indicate the type of| 
| |data set, as follows: | 
| | | 
| {Bit Meaning when on | 
| }O-3 Reserved (0). | 
| j 4 SHR | 
| {5 NEW { 
| | 6 MOD | 
| | 7 OLD | 
Pee cg ie ws ope See eer cn Se ae re ge eh oh J 
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ee Se ee Po -SsSe> ToS eS ee re ee ee 1 
| Displacement|Field {Size in| | 
| Dec. Hex. | Name {Bytes | Contents | 
cia aa ee ic | ee iaaeaia ene oS 1 a Rn ee ae IG { 
22 17 PDISP2 1 {Bit settings that indicate the normal | J 
| disposition of the data set, as | 
| follows: | 
| 
|Bit Meaning when on | 
{O-3 Reserved (0). 
[4 KEEP 
[5 DELETE 
| 6 CATLG 
\7 UNCATLG 
| 
24 18 PDISP3 1 [Bit settings that indicate the 


|abnormal disposition of the data set, 
jas follows: 


ee, 
p-- 
ct 


Meaning when on 
Reserved (0). 


KEEP 
DELETE 
CATLG 
UNCATLG 


| 


aa oe 
ud 


aS) 
= 
=a 
<4 


| 

| 

| 

| 

| 

| | 
| | 
| | 
| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| 8 |Membername-the name of a member of a_ | 
| | partitioned data set (PDS). If less | 
| [than 8 characters, it must be padded | 
| jon the right with Dlanks. If omitted, | 
| |the entire field must be blank. | 
| | | 
| 3 {Primary space quantity-indicates how | 
| jmany of the units should be assigned | 
| |to the data set initially (the units | 
| | 
| | 
| | 
| | 
| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| 
| | 
| | 
| | 
1 


— se eo i i 


PPRIME 


Jare indicated in the CTB field). 

|Field must be zeros if parameter 

| omitted. 

| 
4 }Address of the dsname Buffer, as 

| follows: 

| 

|Byte Contents 

| 0 The length, in bytes, of the 


POSNP 


| ds name. 

[1-44 dsname, left justified, padded to 
| the right with blanks. 

| 


4Q 28 


z 


8 | Unitname-specifies information about 
Jthe unit the data set will use. If 
|omitted this field must be blanks. If 
Jit is blank, the system will default 
[to the use of all the direct-access 
|devices. It may be one of the 
| following: 


Ji. address of the specific unit. 
|}2. Type (module number) of unit. 
}3. Name of a group of units-this name 
i and the group it belongs to are 
| 
1 


mm og ee rc Oe 


defined during system generation. 


— ee ee ee 


(Continued) 
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Cc 


Cor a ee ee 2 ura ean oe ea ae ee a 1 
[Size in| | 


[Displacement | Field 


| Dec. Hex .| Name 
[------------ on a 
[48 30 {|PTCTB 
| | 

, | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

}49 31 |PSEC 

| | 

| | 

| | 

| | 

{52 34 |PCLASS 
| | 

| | 

| | 

| | 

| | 

| 

| | 

| | 

| | 

|53 35 |PDIREC 
| | 

| | 

| | 

| | 

[56 38 |PFORM 
| | 

| | 

| | 

| | 

[60 3C | PPGMNM 
| | 

| | 

: : 

| 68 44 |PBLKSIZ 
| | 

| | 

| | 

: ! 

| 70 46 |-------- 
epee ee age err aeoe rm 


| Bytes 


om 


W 


_ 


1 
| 
| 
I 
| 
| 
{ 
| 
| 
| 
- 
! 
| 
| 
| 
| 
| 
| 
kK 
l 
| 
| 
| 
| 
l 
| 
| 
| 
| 
| 
| 
| 
{ 
! 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
! 
! 
| 
| 
| 
l 
! 
| 
t 
' 
| 
! 


| Contents | 


| 
} 
| 
| 
| 
! 
! 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
1 
| 
l 
! 
| 
| 
| 
| 
| 
| 
| 
} 
| 
| 
| 
—t= 


[CTB. Bit settings that control 
|operations performed by dynamic 
Jallocation, as follows: 


| 

[Bit Meaning when on 

| 0 Specifies the units used for the 
| Space parameters, as follows: 
[ *01°B-units are average blank 
[ length 

| *10*"B-units are TRKS 
| *11'B-units are CYLS 
{2 Reserved (0). 
| 3 RLSE is desired. 
{4-7 Reserved (0). 
| 

| 


Secondary space quantity-Indicates how 
Jmany of the units should be assigned 
jto the data set when the data set 
Jexhausts its space. The field must be 
|zero if the parameter is omitted. 
| 
| Output class-specifies an output class 
Jinto which the data set should be 
|placed. It may be an alphabetic 
| character from A to Z or a numeric 
{from 0 to 9. Regardless of the output 
jclass specified here, the SYSOUT data 
jset will be placed on the queue for 
Jthe message class. If SYSOUT is not 
|specified, this field must contain 
| blanks. 
| 
| Directory space quantity-Indicates the 
|size of a directory of a data set with 
| partitioned organization (a BPAM data 
|set). This field must be zero if the 
| parameter is omitted. 


| Form number-indicates that the output 
|should be printed or punched on a 
|specific output form. It is a four 
|digit form number. This field must be 
|blanks if this parameter is omitted. 

| 

| Programname-The member name of a 
|special user program to handle SYSOUT 
| operations. This field must be blanks 
Jif this parameter is omitted. 


| 

| BLKSIZE-Average block length 
[parameter. If specified it must be 
jless than 65,536 bytes. This field 
[must be zero if the parameter is 
jJomitted. 


[Reserved (0). 


eG ee SOI RT RTE oN! BREA IP PR cl PO a re ee PT PE HR epee ER RD = = SES see Gee GE soe EE eee 2 ee eee eee ee ee 
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Cs ee a ey ne a, es H 
| Displacement |Field |}Size in| | 


(esa Hex .| Name |Bytes | Contents | 
<----~-==-- }----------}-------}---------------=- === == 5-2 
72 48  |PSERNO 6 |Serial Number-The serial number of the| 


| 

| | {volume for this data set. If | 
| { |specified, the request is for a 

| | j|specific volume. Field must be blanks| 
| | |if parameter is omitted. | 
| | | | 
78 “EO |-------- | 1 {Reserved (0). | 
Sas Se see Ba Sc a a ee 
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DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘'02° 


Size: 24 bytes. 

Created by: IKJEFDOO -- DATIR18 

Used by: UNALLOC and DSE UPDATE routines. 
Contents: Addresses and control information for the 


UNALLOC function of SVC 99 dynamic allocation. 


|Dec. Hex. | Name | Bytes 


}------------ $--—------ $------- 
0 0 


Contents | 


ea ert EE Se i ee 4 
*X0018° the size in bytes, of the 


arameter block. 


nn?) 


°Q2' Function code. 


had No 


Cd 


ions. Bit settings, as follows: 
Meaning when on 
Data set is allocated to more 
than one user. Dynamic 
allocation will not remove from 
the Data Set ENO Table and will 
not dequeue the data set. 
DAIR could not catalog the data 
set. Dynamic allocation will not 
uncatalog the data set. 


© 
ce ct 


}- 


£ 
£ 


8 |ddname associated with a currently 
jallocated, closed TIOT entry. 
| 


1 | Reserved. 
| 

1 |Bit settings that indicate the normal 
[disposition for the data set, as 
| follows: 


pat 
bm 
Q 


~~ 
wW 
o 


Bit Meaning when on 


Reserved (0). 
KEEP 

DELETE 

CATLG 
UNCATLG 


aA E © 


pa 
_ 
3) 


1 | SYSOUT class-A single alphameric 
|character (0-9),(A-Z). (Note: The 
| SUBMIT command processor passes the 
| SUBMIT queue number rather than a 
|SYSOUT class to have its data sets 
|placed in the proper queue.) 
| 


1 |Reserved (0) 
SSS fas a ee ae 


PC _ ae = as Ge eee Oe ees ee eee Se ogee ee eo ee ee gee OE gee OO es Sw ge OE oe SO ope ee Oe es Oe ee oe Oo ee 
-— —_ — — ee ee es OO eee ogee ge OE ee es ee ge es oe gs SS cogs SE ce ee og SE es, OO" “ee 
bene eememe qeeeses SE gee ee ee SS ES gee GE ees Oe ——P gee ee eee ee ee eee eee ee gee Oe eee ee eee ee ee ee es ee ee ee eee eee eee ee 


poe ee ee —— gee Ee eee Oe ee Oe eee 
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T 
| Displacement Field |Size in 
| Dec. Hex. | Name | Bytes 


| 
| 8 |An 8 byte field that contains the | 
| jobname used to enqueue the SYSOUT | 
| data set. If the jobname is omitted, | 
| {the field must contain blanks; the ; 
{ | jobname from the TIOT will be used to | 
! | 


Pengucve the SYSOUT data set. 
Dearne Speen Ws enter ae cde A Ey RO On CEE ee Mey ar J 


4 
| 
| 
| 
| 
| 
| 
| 

L 


DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘03° 


Size: Variable. 

Created by: IKJEFDOO -- DAIROC. 

Used by: CONCAT and DSE UPDATE routines. 

Contents: Addresses and control information for the 


CONCAT function of SVC 99 dynamic allocation. 


|Operation| 

|Diagrams | 

{------—-—— 

| 20,24 | 

FE ap a Ee RT FT eR NCE On OR SS Son A a ee Re eet 
[Displacement | Field ]Size inl | 
| Dec. Hex. | Name {Bytes | Contents i 
}------------ $---------- ------- }--------------~----------------------- + 
| 0 0 (===S-=== | 2 | Length=4+9n, where n is the number of | 
| | | | ddnames to be concatenated. [ 
| | | | | 
j2 2 (===S5s-- | 1 j1X°O3° Function code. f 
| | | | | 
[3 3 L=—==-S== |} 1 {Reserved (0). | 
| | | | | 
[4 4 [=a 5es= | 8 |ddname for the first allocated, ; 
| | ; | unopened TIOT entry to be | 
| [ [ | concatenated. | 
| | | | | 
{12 Cc (=Sa-oS== { 1 |Reserved (0). | 
| | | | | 
{13 D j= S=S-5> | 8 | ddname for the second allocated, | 
| | | Junopened TIOT entry to be | 
[ [ | | concatenated. | 
| | | | | 
|. : | | | - | 
|- . | | | - | 
| - °. | | | - | 
| - : | | | - | 
| | | | | 
{13+9n | } 1 [Reserved (0) [ 
a Y ey een eer a oe ) Ca ae ea A ap pee ce es ae ae ee ee ee Ce RR J 


|Note: At least two ddnames must be specified; a maximum of 255 j 
|ddnames may be specified. | 
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DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘04' 


Size: 13 bytes. 

Created by: IKJEFD00 -- DAIRO8, DAIR10, DIARIC, DAIR30. 
Used by: DECONCAT and DSE UPDATE routines. 

Contents: Addresses and control information fcr the 


DECONCAT function of SVC 99 dynamic allocation. 


Cee 1 
|Operation| 
[Diagrams | 
{ 20,25 | 
renee mia as (eerie foes t ee ee fs s= 1 
| Displacement | Field |Size in| i 
| Dec. Hex. | Name jBytes | Contents i 
~---------- }----------+--~----}-------------------------------=----—-f 
| 0 0 [(=s==-=s= | 2 [x*O0O0D*. The size, in bytes, of the | 
| [ ; [parameter block. [ 
| | | | | 
| 2 2 (=S-==S= |} 1 [Function Code X*'Q4'. | 
| | | | | 
[3 3 [o-SSss== | 1 | Reserved (0). | 
| | 
)4 4 SSS s-5> | 8 j|ddname for a group of data sets that | 
i [ | |have been concatenated. | . 
| | | | | 
{12 Cc a a j 1 |Reserved(0). | 
bee i Se Sener een i eee eee I A a Et a eer J 
DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘'05° 
Size: 2 bytes. 
Created by: IKJDAIR STAE routine (IKJEFDOO). 
Used by: IGCc00099. 
Contents: The function code of X‘'05°, which indicates to 


the allocation control routine that an ABEND, 
for which cleanup of the dynamic device request 
may be necessary for this task, has occurred. 
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DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X‘06' 


Size: 40 bytes. 

Created by: IKJEFDO0O -- DAIRO8, DAIRIC, DAIR24, DAIR30. 
Used by: CONVERT and DSE UPDATE routines. 

Contents: Address and control information for the CONVERT 


function of SVC 99 dynamic allocation. 


\Operat vont 

|Diagrams | 

| 20,23 | 
5 ae aa EE SSeS co a ea 
| Displacement] Field {Size in| [ 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ $----------}------- ae eS Se oe 
| 0 0 [SSS =S=— {| 0 |X°0028'. The size, in bytes, of the | 
| | | |parameter block. l 
| | | | 
| 2 2 ereteeaa || OL |Function code X'06°. | 
| | | | 
| 3 3 jaSoee Ses | 1 J|Options. Bit settings, as follows: | 
| | | | | 
| | | [Bit Meaning when on | 
| ] | {0 Reserved (0). | 
| | | }1 Read JFCB for DSE UPDATE; The DSE| 
| | | | DSORG field is zero. | 
| | | | 2 Change data set disposition. | 
| | | |3 Change data set status. | 
[ i [ | 4 Change member name. | 
| | | [5 zero the DCB-oriented fields in | 
| | | | the JFCB. Change blocksize. 
| ; | | 6 Change status from SHR to 
| | [ | exclusive. (Possible only if the| 
| i [ | current ENQ environment will | 
| { ; | allow the use attribute to be 
| | i | changed from shared to 
| | | | exclusive.) | 
| | | |7 Change DDNAME1 to DDNAMEZ2. | 
| | | | | 
| 4 4 [HSS S ee | 8 |Current ddname. Ddname associated | 
| | | Jwith the currently unopened data set. | 
| | | | | 
j12 Cc [SSeS eSe2 ; 1 |Reserved (0). | 
| | | | | 
{13 D LSeSoSSo= | 8 |New ddname(DDNAME2). | 
| | | | 
{21 LS [eee = | 1 | Reserved. | 
| | | | | 
{22 6. (eS seeee= | 1 |Status. Byte settings, as follows: | 
| | | | | 
[ | ; |Byte Meaning when on | 
| | | [x"00' omitted | 
| | | |x'01' OLD | 
| | | [X'02' MOD | 
| | | [xX'03' NEW l 
| | | [X'08' SHR | 
ape ete en fee a eigen eye a a 5 eee a ore Oh acy ig Se Ee J 
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Cc 


r T 
|Displacement |Field |Size in 
Dec. Hex .| Name | Bytes 


Rete gg eds ba Sep eT ees Gey 2 eee Bp a reg eg ne ey Pe eg Ee, ne ee te ee 


ND 
£ 


19 


) 
Ww 


19 


lad 
ee) 


21 


Contents | 


{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
{ 
l 
| 
[ 
| 
| 
| 
| 
{ 
{ 
l 
| 
l 
| 
{ 
| 
| 
| 
—tn 


Bit settings that indicate the normal 
disposition of the data set, as 
follows: 


w 
p-- 
ct 


Meaning when on 
Reserved(0) 


KEEP 
DELETE 
CATLG 
UNCATLG 


1 
Wd 


Oa US © 


1 {Bit settings that indicate the 
jaonormal disposition of the data set, 
jas follows: 


ee) 
pte 
ct 


Meaning when on 
Reserved(0). 


KEEP 
DELETE 
CATLG 
UNCATLG 


! 
Gd 


IAM £& © 


8 |Membername. The name of a member of a 
Jpartitioned data set (PDS). If less 
jthan 8 characters it must be padded on 
[the right with blanks. If omitted, 
[the entire field must be blank. 


| 
3 [Average record length. If bit 5 in 


{the options field is set, this field 
Jwill be used to fill in the average 

| record length and blocksize fields in 
[the JFCB. 


ae ae a a ee es oe ee ee ee ey ep ee es ee cee ee ce ee es ce ee es es ee ee ee ee es se es ee 


ap eee coe ce ge 0 cs "eee = oe == gee = gees = gees es ee es ee ee ee ee ss es es ee es es ss ee 
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DYNAMIC ALLOCATION PARAMETER BLOCK, FUNCTION CODE X'‘07" 


Size: 16 bytes. 

Created by: IKJDAIR. 

Used by: 3C30099 (Dynamic allocation, SVC99). 
Contents: Address and control information for the ATTRIB 


function of SVC 99 dynamic allocation. 


Co ere 1 
| Operation| 
|Diagrams | 
| 20,27 | 

hip ie : oe a sage a ca a aaa = 
Displacement | Field {Size in| [ 
| Dec. Hex . | Name [Bytes | Contents | 
}------------ +---------- }-------}-------------------=---------------- —{ 
| 0 0 | SIZE i 2 |Size of parameter block. | 
| | | | 
| 2 2 | CODE | 1 [Function code-X'07". | 
| |. | | | 
| 3 3 | OPTION | 1 | Function to perform: | 
i |UNCHAIN | [Bit O=1 Unchain ATRCB | 
| | CHAIN ; | 1=1 Chain attr. list | 
| | | | [ 
[4 4 | ATRPTR ij 4 J|Addr of DAIRACB for chain function or | 
| | | J ATRCB for unchain. | 
| | | | 
| 8 8 | ATRNME | 8 |Attr-list name per chain function. | 
ee | ieee keene bee I as rs J 
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DYNAMIC ALLOCATION WORK TABLE (DAWT) 


Size: 552 bytes. 

Located in: Subpool 252. 

Created by: IGC00099. 

Used by: All functions. 

Updated by: All functions. 

Contents: Formatted information, as shown below, plus the 


first, second, and variable work areas (DAWAI1, 
DAWA2, and DAWIVARY, respectively). Note that 
the field format in DAWTVARY is different for 
each functional grouping of routines; these 
various configurations of DAWTVARY appear on 
the following pages. 


[Operation| 

[Diagram | 

— P 2a-26 | 

[Displacement|Field [size in) ~SOSOSC~C~CS — 7 
| Dec. Hex . | Name | Bytes | Contents [ 
[0.0 |xcTLAD | & Address of entry point name for XCTL. | 
a i foe | 4 nee address for XCTL.. : 
fe 8 ieee | 8 oe point name for XCTL. | 
iat 10 foe | u naaeeee of SVC parameter list. | 
26 14 raed | 2 aie of DAWT. | 
2 16 ie | 1 ieeceued: | 
oe 17 eon | 1 ee number. | 
a 18 1 oie | 4 lauee entry address. | 
be 1c LeaeouE | i faeedea code. | 
ae 20 for | 36 cuba | 
ee ay DAWETOR 84 ncanate for use by the transient saene| 
| | |manager. | 
oer 88 frre | 176 |First work area. | 
{312 138 ere ! 176 eecana work area. | 
ar 1E8 | DAWAVARY 1 48 ceases work area. i 


— b--~--—-—--—-—--1---—----~-- 
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DYNAMIC ALLOCATION WORK TABLE, VARIABLE AREA (DAWTVARY) AS USED IN THE 
DATASET FUNCTION 


Size: 52 bytes. 

Located in: DAWT -- (Subpool 252). 

Created by: IGC00099. 

Used and Updated by: IGC07099, IGC08099, IGC09099, 1IGC10099, 
IGC11099, 1I1GC12099, IGC13099, IGC14099, 
1GC15099. 

Contents: Work area for the DATASET function. 

(-s =e 1 
| Operation | 
[Diagram | 
| 21 
(=246--— === +----—---+-- T------ Sp Sa a= SSS = SS == i——-----—— | 
| Displacement| Field [Size in| 
| Dec. Hex. | Name {Bytes | Contents [ 
EE ete ee eee ee Tee $———-—--4-_____________ 
ae 0 | DAWA1P i; 4 | tdynamic allocation work area #1. | 
| | | | | 
| 4 4 | SIOTPTR | 4 | *SIoT buffer. | 
| | | | | 

{8 8 | DAWA 2P | 4 [tdynamic allocation work area #2. | 

| | | | | 

J12 Cc {| FTTR | 4 {TTR of the DSENQ record. | 

| | | | 

[16 10 | CURUPLW | 4 | *CURRENT UCBLIST. | 

| | | | | 

| 20 14 =|DEVTYP i 8 |Device type, subfielded as follows: | 

{20 14 | DMrP | 4 | tbit pattern. | 

| 24 LS. | ====- ; 2 | Not used. | 

| 26 1A | UCBP | 2 | *UCB. { 
| | | | | 

{28 1C {|ENQP |; 4 [tENQ dsname parameter list. ; 

| | | 

[32 20 |TCBPIR i; 4 j*Caller's TCB. i 

| | | | | 

|36 24 =|ENQLIST } 4 |*ENQ parameter list. | 
| | | | 

{40 28 #=—|VFLAGS } 1 [Flag bits, as follows: [ 

| | l |Bit Meaning when on | 

[ | VDUMMY | | 0 Dummy data set. | 

| | VDOMIT | { 1 Omitted dsname. | 

| | | | Or | 
| | VDDR | j 1 DDR is in system. | 

[ | VNEW | | 2 Disposition is NEW. [ 

i | VDELDMT | | 3 DMT is to be deleted. | 

i | VSPFCUCB | {| 4 Specific UCB. | 

| | VSPFCVOL | | 5 Specific volume. | 

| | VBPCONST | | 6 Pattern construction area is | 
| | | | built. | 

{ | v2321 | {| 7 2321 pass. | 

Lietece aie ee 1 aa eat Be ets ss Di i a eS ee ee J 


(Continued) 
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‘Soa ig a a ee aie aaa a a gn ee pe eo eR ee a ae 1 
| Displacement Field | Size in| | 

¢ | Dec. Hex. Name {Bytes | Contents | 
i a : 

[41 29 MS GLV | 1 {Message level. | 

| | | | 

[42 2A: <==se } 1 |Not used. 

| | | | 

{43 2B NAMES IZ | 1 }Size of dsname. | 

| | | | 

{44 2c LOADLIST | 4 {tLoad parameter list. | 

| | | | 

{48 30 CANDSIZE | 4&4 |Size of candidate list. | 

Ue eh ah eee J 
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DYNAMIC ALLOCATION WORK TABLE, 
FReelING FUNCTION 


VARIABLE AREA (DAWIVARY) AS USED IN THE 


Size: 48 bytes. 
Located in: DANT -- (fSubpool 252). 
Created py: ISC00099. 
Used by: Isc01099, IGC02099, IGC03099, IGCO4099, 
IGCO05099, IGC0Q6099, IGC21099. 
Updated py: 5$C01099, IGC02099, IGC03099, IGCO4099, 
IGC05099, IGC06099, IGC21099. 
Contents: Work area for the UNALLOC function. 
ah Aa rea EI 
| Operation| 
{Diagram | 
t-------- 4 
[| 22 | 
.---=---—> ees cae : SEE 7 ==>5 Soest Sesesss ae SHoe aes 1 
|] Displacement]| Field {Size in| [ 
| Dec. Kex. | Name |Bytes | Contents | 
[~~~ -------- f--------~- +------- $----~--- = aT EEDEN EEE EREREEEE { 
| 0 0 | TEXTP | 4 | Address of the TIOT extension. | 
| | | | | 
14 4 | JCTP | 4 | Address of the JCI. { 
| | | | 
|8 8 | STTRP | 4 |Address of the SIOTITIR record. | 
| | | | | 
ji2 Cc |SCTP | 4 jAddress of the SCI. ( 
| | | | | 
|16 10 |SIorP | 4 {Address of the SIOT. | 
| | | | 
j20 14 =x|JFCBP | 4 j|Address of the JFCB. | 
| | | | | 
{24 18 |ATOBUFP | 4 | Address of the wroO buffer. { 
| | | | | 
{28 1C |PARMP | 4 | Address of the macro parameters. | 
| | | | | 
| 32 20 |WMACP | 4 | Address of the macro volume list. | 
| | | | | 
{36 24 {[-- | 1 |Reserved for the future. | 
| | | | | 
|37 25 |-- | 3 {Protect key. | 
| | | | 
{40 23: jess | 8 {Reserved for future use. | 
ee. 5 eee eee 5 eee ae are 5 te a en et a ea een ae Nene ed J 
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DYNAMIC ALLOCATION WORK TABLE, VARIABLE AREA 
ATTRIBUTE CONVERSION FUNCTION 


(DAWTVARY) AS USED IN THE 


Size: 48 bytes. 
Located in: DAWT -- (Subpool 252). 
Created by: IGCO00099. 


Used by: 1GC16099, IGC17099. 


Updated by: IGC16099, IGC17099. 


Work area for the CONVERT function. 


Contents: 
| Sie ER | 
| Operation | 
[Diagrams | 
t—-----—-} 
| 23 | 
ci es : as aaa cna Secale co ni en aca aaal -+ 
| Displacement |Field [Size in| | 
|Dec. Hex. | Name {| Bytes | Contents ; 
|--—----~---- ---—---_--} -—_-——_ -+4-__---_----__-----—_---—--—--_--—--- 
| 0 0 | DAWA1P | 4 jAddress of DAWT work area 1 (DAWA1). | 
| | | | 
[4 4 | DTTR | 4 JTTR of the DAWA1 record. | 
| | l | ; 
[8 8 | DAWA 2P | 4 j|Address of DAWT work area 2 (DAWA2). | 
| | | | | 
{12 C | DTTR2 | 4 |TTR of the DAWA2 record. ; 
| [ | | 
[16 10 |TIOT2P | 4 JAddress of the second ddname TIOT ] 
| a ee | 
{20 14 $|TTRSIOT1 | 4&4 |TTR Of the first ddname SIOT. { 
| | | | 
{24 18  |TTRSIOT1 | 4 |TTR Of the second ddname SIOT. i 
}------------ Bee See Becta 2 ite 0 aed ee ee aed rans ra pes ee eee ee — 
|NOTE: The following optional use of this word of storage takes effect | 
| if Bit 6 of VFLAGS is on to indicate the need for a second ; 
| SIOTTR record. | 
|------------ ---------- -.--- Won rn nnn nnn nnn nnn nnn | 
{24 18 |TTRSTTR2 | 3 |TTR of SIOTTTR record. 
| | | | | 
{27 1B |NUMTTR2 | 1 {Number of the TTR for ddname2 SIOT. | 
| | | | 
[28 ic |-- | 8 | Initiator enqueue parameter list. | 
| | | | 
[36 24 |SYSDSN | 8 | Enqueue major name. | 
| | | | 
(44 2C |VFLAGS | 1 | Bit settings, as follows: | 
| | | | | 
| [ | |Bit Meaning when on | 
! | | | 
{ | | | 0 Reserved. | 
; I | j1 SIOT must be read. | 
] | | J 2 Reserved. | 
| | [ | 3 JFCB must be read. | 
| ; | (4 JFCB read only for | 
| | | DSE UPDATE. 
i [ | | 5 Reserved. [ 
| | | 6 SIOTTTR must be read. | 
| | | 7 Reserved. | 
Pepe saee eee ye ae ee a [ene Be ee i Se J 
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Ce Ge ee To ee Ga ee a ee 1 
| Displacement | Field |Size in| | 
| Dec. Hex .| Name |Bytes | Contents | 
}----------—- $------—-- }-----—- fas es ee 
| | | | | 
[45 2D |-- | 1 . | Reserved. | 
| | | | | 
| 46 2E |TIOT2NO ; 1 |Relative number of the second ddname_ | 
| | | |TIOT entry. | 
| | | | | 
{47 2F [-- | 1 | Reserved. [ 
Se i See Be ea he ee ee ea a eee Se ee 4 


DYNAMIC ALLOCATION WORK TABLE, VARIABLE AREA (DAWTVARY) AS USED IN THE 
CONCATENATION FUNCTION 


Size: 48 bytes. 

Located in: DAWT . 

Created by: IGC00099. 

Used by: IGC18099, 1I1GC19099, IGC20099. 

Updated by: IGC18099, 1I1GC19099. 

Contents: Work area for the CANCAT function. 
| Operation| 
[Diagrams | 
| 24 | 

[Displacement|Field [Size inf = = i 

| Dec. Hex... |Name’ | Bytes | Contents 

jo. 0 |zexrp | ® |Addresa of the T10T extension. 

14 & - | u fees of TIOT entries. 

[8 8 | STTRP ! i aadeese of subject SIOTTTR record. 

{12 Cc eeaen | ty teanaeh of TIOT. 

ae 10 ee | & aaasees of new TIOT. 

oi 14 em | 4 iaaeeee of concatenate table (CATTAB). 

or 18 foe 4 iicucorany pointer. 

oe ic ie | & aes variable. 

! 20 ie | 4 ieeeue manager parameters. 

or 24 ieee | u  aabeaee pointer. 

| 40 28 rope | 4 hvambee of open data sets. 

re zc = | u iebeepuee 

ee eo ee fies ee eer Ane eee Pn po ea PP eee a 
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ee ae ees GE eee ee ee eee oe 


DYNAMIC ALLOCATION WORK TABLE, VARIABLE AREA (DAWTVARY) AS USED IN THE 
( UPDATING FUNCTION 


Size: 48 bytes. 
Located in: DANT -- (Subpool 252). 
Created by: IGC25099. 
Used by: ISC25099, I1GC26099, IGC27099, IGC29099. 
Updated by: IGC25099, IGC26099, IGCZ7099, IGC29099. 
Contents: Work area for the UPDATE function. 
ae eed 
| Operation| 
[Diagrams | 
| 26 | 
Sacer Reais a Sea aN Sal ESS Aca eae cae ea _SaSS Sloe 1 
| Displacement| Field |Size in| | 
| Dec. Hex. | Name | Bytes | Contents | 
|------------ t---------- t------- $---------------—-----=-------—-----— ! 
{0 0 | DD1 ADD | 4 |Address of the first ddname. | 
| | | | OR | 
{ [ i |Address of the TCB if Bit 3 Of VFLAGS | 
| | | jis on. | . 
| | | | | 
ae 0 | OLDDSE | 4 [Address of DSE to change. f 
| | | | 
| 4 4 | DD2ADD | 4 [Address of the second ddname. | 
Soa | | | | | 
| 4 u | NSWDSE | 4 |Address of DSE to replace OLDDSE. | 
| | | | | 
| 8 8 | DAWLP | 4 [Address of DAWT work area 2 (DAWA2). | 
| | | | | 
Ji2 Cc | DSNADD i; 4 JAddress of the DSLNGTH dsname buffer. | 
| | | | | 
Ji2 Cc | ADDINIT | 4 JAddress of first DSE. { 
| | | | | 
| 16 10 |ADDNAME1 | 4 JAddress of the DSE block containing | 
[ | | | first ddname or dsname. | 
| | | | | 
{16 10 |LASTDSE | 4 | Address of last DSE. | 
| | | | 
{20 14 |ADDNAME2 | 4&4 | Address of the DSE block containing | 
| [ [ |the second ddname. | 
| | | | | 
[24 18 |AFDSE |} 4 [Address of the first DSE block. | 
| | | |: | 
| 28 ic |ANDSE | 4 JAddress of the new DSE block. [ 
| | | | | 
| 32 20 |ADSNDSE | 4 JAdaress of the next DSE on the chain. | 
| | | | | 
| 36 24. |====+- i 8 |Reserved for future use. { 
TE ee a ed oe eae 2 es eee | See area eee Ne ce ea Sg a ee J 
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| Fe ee ey ee SOM eee ee ee ose 


Displacement| Field 


|Dec. Hex. | Name 
a ‘ 
[44 2C |VFLAGS 

| | 

| | 

| | 

| | 

| 

| | 

| | 

| | 

| | 

| | 

145 20 |CONCOUNT 

| | 

| 46 ZE. | == 

pace ae ee ee Pe Bere 


— ee ee oe we 


Contents 


Bit settings, as follows: 


tw 
ed 
cr 


Meaning when on 
First ddname found. 


Second ddname found. 
dsname found. 

Search on TCB address. 
Reserved for future use. 
Only one DSE in chain. 
Chain new DSE in front. 
Chain new DSE at end. 


| 


Number of DDs to be concatenated. 
R 


eserved. 


-——— — — — — — — — — — — — — — + — 4 
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oie 


Qe cee eee Se ee i ee eee ee Ss ee SE ee SE 


ENQUEUE/DEQUEUE PARAMETER LIST FOR ALLOCATION/TERMINATION RESOURCE 


Size: 40 bytes. 

Located in: Subpool 252. 

Created by: IGC08099, IGC10099. 

Used by: Normally -- IGC11099 (for enqueue) 


IGC15099 (for dequeue). 


Abnormally (in the case of any error exit) for 
dequeue by 1IGC11099, IGC12099, IGC15099. 


Freed by: The module that uses it for dequeue, in all 
cases. 
Contents: Contains the following fields for enqueuing or 


dequeuing from the allocation/termination 
resource (replaces the LIST form of the macro 
instruction). Note that the contents shown 
below repeat after the second ENDIND field. 
Note also that the routines enqueue using 
separate lisis, but they dequeue using both 
lists at once. 


(oS 
| Operation]. 
[Diagrams | 
{ 21 \ 
cea Canes : aa '------- Fon nnn —1.-——----—-—| 
| Displacement |Field |Size in| | 
|Dec. Hex. | Name | Bytes | Contents [ 
}|------------ +------—--- $------- ¢------------------------------------- 
| 0 0 | ENDIND | 1 |X"00° for dequeuing, using both lists | 
{ H | | at once; when the engueue is { 
| | i | accomplished, the using routine | 
| | | | places X'00° in this field. | 
| | | | [ 
| | | |X" FF" for enqueuing. | 
| | | | | 
ji 1 J|MINORLNG | 1 [x'O2". | 
| | | | l 
| 2 2 | OPTIONS | 1 | Bit settings as appropriate. (X‘'4Q* -| 
| | | [Indicates an exclusive request for a | 
| [ | [system resource; do not wait until the| 
i [ | [resource is available.) | 
| | | | | 
{3 3 | RTCODE | 1 }x*oo". | 
| | | | 
[4 4 |-- | 4 j|Address of major name. [ 
| | | | 
| 8 8 |-- | 4 [Address of minor name 1. | 
| | | | 
J 12 Cc | ENDIND | 1 [X°FF*" for both enqueue and dequeue. | 
ee ee eee ae HD eet ae eas ae Og ag ee a ee ee 
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ENQUEUE WORK AREA (EWA) FOR DATA sET NAME ENQUEUE 


Size: 28 bytes. 

Located in: Subpool 252. 

Created by: 1GC10099. 

Used by: Normally 1IGC10099 when enqueuing a dsname not 


previously associated with the job. I1IGC15099 
when enqueuing a data set name to change the 
use attribute from share to exclusive 
(RET=CHNGE). 


Abnormally in the case of an error exit to DEQ 
the data set name in IGC10099, 1GC11099, 
IGC12099, and 1IGC15099. 


Updated by: IGC10099 


Contents: Parameter list for the ENQ macro instruction 
for the data set name, and the parameters for 
the WAIT/POST mechanism with the initiator. 


(So 1 
| Operation| 
|Diagrams | 


a a a eS ee ee eee 
| Displacement | Field {Size in| | 
| Dec. Hex . | Name | Bytes | Contents | 
Sa 1 a ck Ss A IE Ei SSE TG { 2 
INITWRD1 [| 4 |Flags (first byte of the field only) . 
[ |with the following meanings when the 
| jbit is on: 
| | 
[ [Bit 0 -- Indicates that ENQ is to be 
| [ done. 
[ |Bit 1 -- Indicates that DEQ is to be 
| | done. 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
L 


© 
oO 


| 
| 
| 
| 
| 
| 
| 
| 
[Bits 2-7 -- Reserved. | 
{Bytes 1-3 -- Address of the ENQ/DEQ | 

| parameter list. [ 

| | 

& {|The ECB on which the module waits for | 
Jthe initiator to complete the [ 
|requested function. [ 

| 

| 

| 

4 


P 
£ 


20 | Parameter list for enqueuing or 


oe ee ee ee ee ee ee ee i a ee ee 
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PATTERN CONSTRUCTION AREA (PCA) 


Size: Variable 

Located in: Subpool 252 

Created by: IGC1 2099 

Used by: IGC13099 

Freed by: IGC13099 normally, or by IGC12099 in case of an 
error. 

Contents: Bit pattern for the main UCBs and 2321 subcells 
eligible to satisfy this request for dynamic 
allocation. 

ae. 
| Operation] 
|Diagrams | 
[---------- 
| 21 | 
foes | ma Re era ee ee a ee ee Sa { 
| Displacement | Field |Size in| | 
| Dec. Hex . | Name | Bytes | Contents [ 
pe aS 6 SS fa ee nn St a ee | 
| 0 0 | None | 4 | Reserved. | 
| | [ | | 

{4 u | UCBCNT | 2 {Number of UCBs represented in this | 

| | jtable. | 

| | | _ . | 
| 6 6 | PCCNT {i 2 |Total number of eligible devices. [ 

{ | | | | 

{8 8 | DCCNT | 2 {Number of datacells represented in | 

| | | jthis table. | 

| [ | | | 

}10 A | PCASIZE |} 2 {Size of this pattern construction | 

{ | | | area. 

| | | . | 

{12 Cc |MPA } Var. |Bit pattern representing the eligible | 

| | | | devices. | 

bee a pee Se 5 ee eee A a ee eS ne eh ho J 
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2 
2 


OYSOUT WORK AREA 


Size: 
Located in: 
Created by: 
Used by: 
Freed by: 


Contents: 


40 bytes. 

Subpool 252. 

IGcC0O 8099. 

LsC08099, IGC09099. 
IGC09099. 


Space for the system generated data set name 
for the SYSOUT data set. 


oo a ee 1 
|Operation| 
|Diagrams | 
[| 21 | 

De ee ee ere ee Ee ae + 

|Size in| | 

| Bytes | Contents | 

#-------4---------~--—-+-----~---+---++--+-++--+- 

; 40 {System generated data set name for the| 

[ |SYSOUT data set. { 

L rm 


ee a a i he Se 4 
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UNALLOCATE WORK AREA 


Size: 584 bytes. 

Located in: Subpool 252. 

Created by: 1Gc01099. 

Used by: 1GC01099, IGC02099, I1GC03099, IGC04099, 


I3C05099, 1GC06099. 


Updated by: IGC01099, IGC02099, IGC03099, IGC04099, 
IGC05099, IGC06099. : 


Contents: Contains control blocks, lists and parameters, 
and a WTO buffer. 


f=—>>—= 7-1 
| Operation | 
[Diagrams | 
|—--—--- a 
| 22 | 
= 5 SGI ans Si cn TSS SSH 1 
| Displacement |Field {Size in| ] 
|Dec. Hex. | Name | Bytes | Contents [ 
}----------- —$-------—--} -—----+} -------—---——---------- 4 
| 0 0 | SIOT [| 176 |Step Input/Output table. | 
| 
[176 BO |JFCB | 176 [Job file control block. | - 
| | | | 
[352 160 |-- | 124 |Wwro buffer. [ 
| | | | 
[476 1ibc |-- {| 60 |Macro volume list. { 
| | 
| 536 218 |-- | 16 [Macro parameter list. [ 
| | | 
| 552 228 |-- | 32 |Queue manager external parameters. | 
i i i ee ed 
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Section 6: Diagnostic Aids 


This section contains the following information: 


e Messages: DAIR/Dynamic Allocation (Figure 34) -- a summary of 
messages related to failures in DAIR and SVC 99. 


e Register Usage (Figure 35) -- a summary of the use of qenerer 
registers 0-15 for DAIR. 


e Register Usage (Figure 36) -- a summary of the use of general 
registers 0-15 for Svc 99. 


e Return Codes from the Dynamic Allocation Interface Routine (Figure 
37) -- a summary of DAIR return codes and their meanings. 


e Return Codes from SVC 99 Dynamic Allocation Routines (Figure 38) -- 
a summary Of dynamic allocation return codes and their meanings. 
DAIR places this return code in the DAnnDARC field of the DAPsnn, 
where nn is the DAIR entry code. 


Other useful diagnostic information is contained in the DAIR work 
area (DAIRWA) and DAIR parameter blocks. These data areas are described 
in Section 5. 


SS ee oe ee ee ae > > > ee ee ee ss ee eee a a a a ate an aia i aS ap axe cera aim | 


oo ee ee ee ee es a ee a ee ee ee A ee ee ce es ce ee i es ee cs es ee ee ee ee ee 2 ee 2 ws Oe 2 et oe es ee a oe ee oe Se oe eo 


+ 

| IXJ562201 |°1" NOT ALLOCATED, TOO MAY DATA SETS + USE TRE  |IKJEFF18 
{ | FREE COMMAND TO FREE UNUSED DATA SETS 
| IKJ56223I | COMMAND SYSTEM ERROR + DAIR ERROR CODE 
[| IKJ56224I | INVALID SYSOUT CLASS 
[IKJ56225I |DATA SET dsname ALREADY IN USE, TRY LATER + DATA 
| | SET IS ALLOCATED TO ANOTHER JOB OR USER 
{IKJ562261I | INVALID DATA SET NAME dsname EXCEEDS 44 
| | CHARACTERS 
[IKJ56227I |DATA SET dsname ALLOCATED FOR SHARED USE ONLY + 
| | DATA SET IS ALLOCATED TO ANOTHER JOB OR USER 
| IKJ562271I {°1' NOT ALLOCATED, REQUESTED VOLUME UNAVAILABLE + 
4 | VOLUME volume name NOT ON SYSTEM OR NOT ELIGIBLE 
| | FOR YOUR USE 
{IKJ562281I |DATA SET dsname NOT IN CATALOG 
| IKJ562291I |DATA SET dsname NOT ALLOCATED, CATALOG ERROR + 

[DATA SET NAME ALREADY IN CATALOG OR WILL CREATE 

| AN INVALID INDEX STRUCTURE 
IKJ56230I |DATA SET dsname NOT UNALLOCATED, MEMBER OF 

| CONCAT ENAT ION 
IKJ56231 [|(1) NOT ALLOCATED, SYSTEM OR INSTALLATION ERROR - 

| CATALOG ERROR CODE 14 

Or 
CATALOG I/O ERROR 
Or 

DYNAMIC ALLOCATION ERROR CODE 
code 
IKJ562321I |DATA SET dsname NOT ALLOCATED, DATA SET NOT ON 

| VOLUME + CATALOG OR VOLUME INFORMATION INCORRECT 
|I1KJ56233I |DUPLICATE ATTRIBUTE LIST NAME attribute list name 
ls enemies | cde stea LIST NAME name NOT FOUND 


es ee eee a emp oe es es ss ee es ee ee 


rm cee ec ce es ee ee Oe oe ce ee ee Oe ee 


1 
| 
| 
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l 
| 
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! 
| 
be 


Figure 34. Messages: DAIR/Dynamic Allocation (Part 1 of 2) 
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Ei aL A ee aa Pe RR OR Perera er OO RO w 
iMessage rD| Message [Issued by| 
IKJ562351 haMie R NAME SPECIFIED BUT dsname NOTA Bi a a 
| PARTITIONED DATA SET 
| IkJ562361 l PILE eee INVALID, FILENAME RESTRICTED l l 
| | JOBLIB | 
| IKJ562371 IDATA SET dsname NOT ON A DIRECT ACCESS DEVICE l l 
| |NOT SUPPORTED | | 
|IKJ56238I |'1" NOT FREED + SUBALLOCATED DATA SET | | 
| | or | | 
| GENERATION DATA GROUP | | 
| | or | | 
l | PASSED DATA SET | | 
| IKJ56239I | FILE filename NOT ALLOCATED, filename CURRENTLY | | 
| | ALLOCATED AS A DUMMY + FREE filename AND RE-ENTER| | 
| | COMMAND | | 
{| IKJ562411I | (1) NOT ALLOCATED + NO UNIT AVAILABLE | IKJEFF18 | 
| Or | | 
| | INVALID UNIT IN USER ATTRIBUTE DATA SET | | 
[ | | 
| IKJ56243I |DATA SET dsname RESIDES ON MULTIPLE VOLUMES, NOT | | 
| | SUPPORTED | 
| | | 
JIKJ56244I | DATA SET dsname NOT ALLOCATED, DIRECTORY LARGER | | 
| | THAN PRIMARY QUANTITY | | 
| | | | 
| IKJ56245I |DATA SET dsname NOT ALLOCATED, NOT ENOUGH SPACE | | 
| | ON VOLUMES + USE DELETE COMMAND TO DELETE UNUNSED| | 
| {DATA SETS | l 
| | | | 
| IKJ56246I |DATA SET dsname NOT ALLOCATED, FILE IN USE | | 
| l | | 
) IKJ562471 (gee ddname NOT FREED, IS NOT ALLOCATED | | 
| | (DATA SET dsname | | 
| IKJ56248I |DATA SET dsname NOT ALLOCATED, REQUESTED AS NEW | | 
| | BUT CURRENTLY ALLOCATED | | 
| IKJ56249I | DATA SET dsname NOT ALLOCATED, CURRENTLY | | 
| [aErocetEe WITH DISPOSITION OF DELETE | | 
a ca a a a a a he ase ed 
ae 34. Messages: DAIR/Dynamic Allocation (Part 2 of 2) 


Note: The messages in the table above do not emanate automatically as 
result of failures in DAIR or SVC 99 dynamic allocation. They 


available, 


however, 


are 


to any user who wishes interpretive information 


regarding the error return codes from SVC 99 to DAIR, specifically, or 
regarding DAIR/dynamic allocation failures in general. To get 
messages, any user Of DAIR (for example, a command processor, or a 
command processor user) invokes IKJEFF18, the DAIR error code 
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the 


analyser. 


! Auto complier - obtained storage. 


Figure 35. Register Usage: Dynamic Allocation Interface Routine (DAIR) 
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Return Code Meani 
Hexadecimal egning 
IK JEFDOO 00 Successful, 

04 Invalid parameter list. 


Error in catalog management routine, The catalog management return code is stored in the 


CTRC field. 
Error in dynamic allocation, The dynamic allocation return code is stored in the DARC field. 


No entries available for use in the TIOT, 


DDNAME requested is currently unavailable. 


DSNAME requested is a member of a concatenated group. 
DDNAME or DSNAME specified is not currently allocated, 
Error in catalog information routine, 


System error -- the completion code is xxxx, an ABEND code that DAIR receives from the 
STAE macro instruction, 


Figure 37. Return Codes: Dynamic Allocation Interface Routine (DAIR) 
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Return Code 
Hexadecimal Meaning ) 


Dynamic Allocation completed successfully. 


Dynamic Allocation could not delete a table that was loaded using a LOAD macro IGC11099 

instruction, The data set is still allocated. 1GC12099 
IGC 13099 

The temporary data set was freed and deleted, The disposition specified by the calling UNALLOC 

routine is invalid for a temporary data set. 

The data set was successfully freed, but the disposition (catalog or uncatalog) was IGC03099 

unsuccessful, The hexadecimal digit 'w' is a code indicating the reason for the failure. 

w Explanation 

1 A control volume was required and a utility program must be used to catalog the 

data set. 
2 The data set to be cataloged had previously been cataloged or the data set to be 


uncataloged could not be located, or no change was made to the volume serial list 
of a data set with a disposition of CATLG, 


A specified index did not exist, 


The data set could not be cataloged because space was not available on the 
specified volume. 


5 Too many volumes were specified for tne data set; because of this, not enough main 
storage was available to perform the specified cataloging. 


The data set to be cataloged in a generation index is improperly named, 


The data set to be cataloged was not opened and no density information was 
provided, (For dual density tape requests only). 


9 An uncorrectable input/output error occurred in reading or writing the catalog, 


The data set was successfully freed, but the requested disposition (delete) was IGC03099 
unsuccessful, The hexadecimal digit 'x' is a code indicating the reason for failure, 


Explanation 


x ; 
1 The expiration date had not occurred. ) 


4 No device was available for mounting during deletion, 
5 Too many volumes were specified for deletion. 
6 


Either no volumes were mounted or the mounted volumes could not be demounted to 
permit the remaining volumes to be mounted. 


8 The SCRATCH routine could not delete the data set from the volume, 
9 A job was cancelled and was deleted from any one of the following queues: 


Input Queues 

Background Reader Queue 

Hold Queue 

Automatic SYSIN Batching (ASB) Queue 
Output Queues 


Dynamic Allocation encountered an I/O error while attempting to read from All 


SYS] .SYSJOBQE, 


*Note: The symbolic name for the first in a series of routines. For a complete list of SVC 99 Dynamic Allocation 


routines, refer to Figure 29 ~~ Program Hierarchy: SVC 99 Routines 
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c 


Return Code 
Hexadecimal 


duplicate ddnames are not permitted. 


0108 ieee encountered an I/O error while attempting to write to IGC03099 
: : 1GC04099 

1IGC05099 

IGC08099 

IGC11099 

IGC 15099 

1IGC16099 

1IGC17099 

1GC20099 

010C Dynamic Allocation encountered an |/O error while enqueveing on SYS1.SYSJOBQE. 1GC05099 

0204 Reserved, 

0208 No space is available on SYS1.SYSJOBQE. 1GC04099 
|GC08099 
1GC09099 
IGC 10099 

020C The calling routine made a request for the exclusive use of a shared data set. The request 1GC15099 

can not be honored, IGC 16099 

0210 The data set requested is not available, This data set is allocated to another job and its 1GC10099 

usage attributes conflict with this request. 

0214 A direct access device is not available. To be available it must satisfy the following 1GC13099 

requirements: 
o It must be online. 
o It must be ready. 
o It must not be pending offline. 
o It must not be pending an unload, 
o It must be shareable, 
o A MOUNT message must not be currently outstanding. 

y o The volume attributes must have been defined. 
0218 The required volume was not mounted on an available device, 1GC13099 

(See Dynamic Allocation return code 214 for the requirements for an available device.) 

021C Incorrect unitname supplied. 1GC11099 
1GC12099 

0220 

through Reserved, 
0264 
0268 Concatenation was requested, but the DCBTIOT offset cannot be found in this job's IGC 18099 
DEB/DCB chain. 

0304 The ddname was not specified by the calling routine, 1GC00099 
IGC 16099 
[GC 18099 

0308 The ddname specified by the calling routine was not found. 1GC00099 
1GCO18099 

030C An invalid function code was specified by the calling routine, 1GCo0099 

0310 The “exchange” option was specified by the calling program and the TIOT entry for the IGC 16099 

second (new) ddname could not be found, 

0314 Restoring ddnames, as per this request, would have resulted in duplicate ddnames -- 1GC23099 


*Note: The symbolic name for the first ina series of routines. For a complete list of SVC 99 Dynamic Allocation 
routines, refer to Figure 29 -- Program Hierarchy: SVC 99 Routines 
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| Return Code 
Hexadecimal 


Ss el i ee een 


0318 Invalid characters are present in the ddname provided by the caller. |GC07099 
1GC 16099 

O31C Invalid characters are present in the membername provided by the caller, ae 

0320 Invalid characters are present in the dsname provided by the caller, 1GC07099 

0324 Invalid characters are present in the SYSOUT program name provided by the caller, 1GC07099 

0328 Invalid characters are present in the SYSOUT form number provided by the caller, |GC07099 

032C An invalid SYSOUT class was specified by the caller. pees 

0330 A membername was specified but the data set is not a partitioned data set.” 1GC 16099 

0334 , The supplied data set name exceeded 44 characters in length, 1GC07099 

0338 : The dato set disposition specified by the caller is invalid, poees 

033C | More than one mutually exclusive keyword (DSNAME, DUMMY, TERM, or SYS OUT) 1GC07099 
was specified, 

0340 The dsname was not specified and the disposition was not "new", (If the disposition is 1GC07099 
"new " the dsname may be omitted.) 

0344 Dynamic Allocation wos specified in a non-TSO environment, IGC00099 

0348-034C Reserved, 

0350 Jobname field contains zeros, This field may be blank, but may not contain zeros, 1GC04099 

0354 Reserved. Ze 

0358 DELETE cannot be specified if the data set is shared, 1IGC01099 

035C - 0360 Reserved. oe 

0364 JOBLIB DDNAME or STEPLIB DDNAME can not be specified. These data sets have IGC00099 
been opened and thus cannot be allocated, 

0404 The device to be unallocated is not a ie access device, (Only direct access devices 1GC01099 
are supported for dynamic allocation.) 

0408 The new DDNAME is a duplicate of a DDNAME in the TIOT, The calling routine 1GC07099 
requested allocation of a file name (DDNAME) already used for the job. 1GC 16099 

040C The specified ddname is associated with a DYNAM entry. DYNAM entries may not be IGC18099 


concatenated, 


The symbolic name for the first in a series of routines, For a complete list of SVC 99 Dynamic Allocation 
routines, refer to Figure 29 -- Program Hierarchy: SVC 99 Routines 


The SVC 99 routines do not issue these macro instructions, Instead, DAIR receives these codes in the 
DAxxDARC field of the DAIR parameter block for the DAIRxx subroutine that issued the macro; xx is the 
number of the issuing subroutine and its parameter block, 
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c 


Return Code ; ‘ 
0410 The specified ddname is allocated to a data set, The ddname must be associated with 1GC07099 
a DYNAM entry. 
0414 The specified ddname is already allocated to a terminal entry (TERM=TS), 1GC07099 
0418 The referenced data set is a member of a concatenated data group, If the data set was [GC01099 
dynamically concatenated it must be deconcatenated before this request can be honored, 1GC07099 
If concatenated at LOGON, the data set may not be freed until LOGOFF. 
041C The referenced data set is a multi-volume data set, Multi-volume data sets (data sets on 1GCO01099 
more than one volume) are not supported by Dynamic Allocation, [IGC09099 
1GCO1099 
0420 The specified ddname is associated with an open data set, (A data set must be closed to 1GC07099 
be used by Dynamic Allocation.) IGC16099 
IGC18099 
IGC23099 
0424 Reserved, 
0428 The specified ddname is part of a previously allocated space. Dynamic Ailocation cannot IGCO1099 
free it. 
042C The ddname to be freed is associated with a generation data group. Generation data 1GCO01099 
groups are not supported in Dynamic Allocation, 
0430 The specified ddname is associated with a passed data set. Passed data sets cannot be freed IGCO1099 
or converted, 1GC17099 
1GC25099 
0504 A serious error of undetermined cause has occurred involving system data, 1GC27099 
IGC29099 
L x7zz A return code of this form consists of an identifier (x) IGC09099 
representing the system macro instruction returning the code, and the code itself (zz) 1G€E14099 
returned by the macro instruction. 1GC26099 


*Note: The symbolic name for the first in a series of routines, 


If "x" equals 1, the LOCATE macro instruction returned the code, ** 
If "x" equals 4, the DADSM macro instruction returned the code. 
If "x" equals 6, the OBTAIN macro instruction returned the code, «* 


"zz" is the low order byte from register 15 as returned by the macro instruction. 


The return codes for the LOCATE and the OBTAIN macro instructions are described in 
IBM System/360 Operating System: System Programmer's Guide, GC28-6550. 


The return codes for the DADSM macro instruction are as follows: 
Code Meaning 


00 The operation completed successfully. 


04 Duplicate name DSCB. 


08 No evailable DSC3's in the VTOC, 


0c A permanent |/O error occurred in reading or writing a DSCB, 


For a complete list of SVC 99 Dynamic Allociation 


routines, refer to Figure 29 -- Program Hierarchy: SVC 99 Routines 


**Note: The SVC 99 routines do not issue these macro instructions, Instead, DAIR receives these codes in the 
DAxxDARC field of the DAIR parameter block for the DAIRxx subroutine that issued the macro; xx is the 
number of the issuing subroutine and its parameter block. 
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Return Code : : 
M n Routine * 
Hexadecimal aes Routine 


Meaning (continued) 


The absolute track requested is not available, 


The quantity of space requested is not available, 
The record length specified is greater than the track length. 


The number of tracks requested for a split cylinder data set is greater than the 
number of tracks per cylinder. 


The disk pack is a DOS volume and the request is not absolute track, 


The primary quantity of space requested is less than the directory quantity 
requested, 


*Note: The symbolic name for the first in a series of routines. For a complete list of SVC 99 Dynamic Allocation 
routines, refer to Figure 29 -= Program Hierarchy: SVC 99 Routines 
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Section 1: Introduction 


The default service routine constructs a fully qualified data set name, 
when provided a partially qualified data set name by the calling 
routine. A fully qualified data set name has three fields: a userid, a 
data set name, and a descriptive qualifier. 


For example: 
SMITH. ACCTS .DATA 


Userid (user identification ) | 


Data set name (user supplied ) 


Descriptive qualifier 


For a more detailed description of data set naming conventions, refer 
to OS/VS2 TSO Command Language Reference, GC28- 0646. 


In general, default gets control if the terminal user refers to a 
data set without giving a fully qualified name. fhe calling routine 
provides default with the address of the DFPL (default parameter list), 
which contains the address of the DFPB (default parameter block). The 
DFPB contains an address that contains the data set name, as provided by 
the terminal user. 


Default prefixes the userid to the data set name, checks the data set 
name against the system catalog, and if necessary either inserts the 
proper qualifier or prompts the user to choose a qualifier. 


As supplied with TSO, the default service routine resides in 
SYS1.LINKLIB or SYS1.CMDLIB and executes in the user's foreground region 
with the protection key assigned to that region. An installation may 
choose to make default resident in the TSO link pack area (TSLPA) in the 
region assigned to the Time Sharing Control Task (TSCT). The default 
service routine requires about 4,000 bytes of main storage. 
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Section 2: Method of Operation 


Method of Operation Diagram 29 shows how the default service routine 
constructs a fully qualified data set name. 


The default service routine works this way: 


e A TSO command processor calls default quality the data set name. 
The calling program passes the address of the default parameter list 
(DFPL) in register 1. 


e The DFPL points to tne default parameter block (DFPB), which 
contains the entry and control codes. The entry codes tell default 
to use the qualifier provided by the calling routine, the terminal 
user, or the system catalog. Additional functions that default can 
performed are specified by control codes. (For example: An entry 
code of X‘04" causes the system catalog to be searched for a data 
set name qualifier, and a control code of X‘'20° causes the data set 
name to be prefixed with the userid.) 


e Default uses the catalog information routine (IKJEHCIR) to search 
the system catalog and find one or more data set qualifiers. If the 
routine finds more than one qualifier, default prompts the terminal 
user to choose one of then. 


e Default prefixes the userid and adds the data set qualifier, as 
required, and returns control to the calling progran. 


ENTRY TO DEFAULT 


Default receives control by either a CALL or LINK macro instruction at 
entry point IKJDFLT in load module IKJEHDEF. At entry, register 1 
points to the default parameter list (DFPL). 


The default parameter list contains: 


e The address of the user profile table (UPT). 

e The address of the environment control table (ECT). 
e The address of the event control block (ECB). 

e The address of the default parameter block (DFPB). 


The default parameter block contains an entry code and a control 
code. These codes are set by the calling program to specify the 
functions required. Figure 39 describes the entry codes and Figure 40 
describes the control codes. 
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fe ee a a eS ea ee ee eee eS 1 
lEntry| | 


| 
|Code | Function Requested [Functions Performed by Default | 


----- }-------------------------------}---------------=----------------] 
|x'O00"|Use the qualifier provided |Uses qualifier from DFPB, as | 
|by the caller. |provided by the caller. 
= - | PERRO TNE, FEE Ga ee a a ee { 
|X"O4"|Find a qualifier. If there | @ Builds a list of possible | 
| {is more than one, prompt the | qualifiers. | 
| [terminal user to choose one. | @¢ Prompts the terminal user to| 
| | | choose one. | 
| | | e@ Checks his response against | 
| | [ the list. | 
es Mee a tied Paty a ee ee tee 1 
|X"O8"|Find a descriptive qualifier, | e Builds a list of possible | 
| |but don't prompt the terminal (| qualifiers. | 
| Juser. | e@ Returns control to caller | 
| | [ with a control code [ 
| | | indicating more than one | 
| | | qualifier was found; thus | 
| | | prompting is necessary. | 
}-----}------------------------------- }-------------------------------- 
|X"OC*|Use qualifier from DFP or |Does one of the following: | 
| |find one from system catalog, | e If a qualifier is provided | 
| |or use a new one submitted by | in DFPB, uses it. [ 
| Jthe terminal user. | e« If no qualifier is provided:| 
| | | - Builds a list of possible | 
| | | qualifiers. | 
| | | - Sends list to terminal. |. 
| | | - Prompts terminal user to | 
| | | choose one from the list | 
| | | or submt a new one. | 
ee 0 ae a en ee eae een! Cah aN on near nee Sree ee en ee ce reer 
Figure 39. Entry Codes: Default Service Routine 

a pk GT ee a le ap Se Se NE So PRE PEN TNT Dae RE POR SEO OO eS me CRN 7 
iControl Code] Functions Performed by Default | 
| Flags | | 
a a a ee a a ee r 
{Bits 0-1 |Not used (0). | 
| | | 
{bit 2 {Prefixes the given data set name with userid. | 
| | | 
|Bits 3-4 [Not used (0). | 
| | | 
[Bit 5 JReturns a copy of any added qualifier to the caller. | 
| | | 
{Bit 6 {Uses the qualifier provided by the caller. | 
| | 
|Bit 7 |Issues a message telling the terminal user that an old | 
| |data set is about to be reused. | 
beat ee Ss Geo a a ng Pa ea ere RE pg ee eee SO me en er eee J 


Figure 40. Control 6odes: Default Service Routine 
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PREFIXING USERID TO DSNAME 


If bit 2 of the control code pwyte is on, default prefixes the userid, 
which was specified at LOGON, to the partially qualified data set name 
located in the data set buffer supplied by the caller. The address of 
this buffer is located in the DFPBDSN field of the default parameter 
block. The format of the data set name buffer is as follows: 


(7 >= se eS ee i ee nee ES ep a ae a Ee OES Fa 1 
| Byte | Contents | 
EES 5 Mr ee ee a Ee a A rk Pe RY Oe a aU: ay Me DT EE eg aS a eA eS r 
{O-1 |The length of the data set name, in bytes. | 
| | | 
{2-45 |The data set name, left justified and padded to the right with | 
| | blanks. | 
beSeo Oa ga J 


SEARCHING THE SYSTEM CATALOG 
Default invokes the catalog information rouine (IKJEHCIR) to search the 
system catalog for the required qualifiers. Default must supply the 
userid and the data set name as a search argument. 

The catalog information routine does the following: 

e Issues the LOCATE macro instruction to search the system catalog for 

the required qualifier. 

e Returns a list of qualifiers to default. 
EXIT FROM DEFAULT 
Default returns to the calling control program by issuing a RETURN macro 


instruction. All registers, except register 15 which contains the 
return code, are restored. The return codes appear in Figure 43. 
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werso0ig AOYTUOW TeuTWASL ZSA/SO 


(I eseatTeu ZSA) 


INPUT PROCESS RESULT 


Register | 


Default (IKJEHDEF ) 


Default will fully qualify a data set name. System Catalog 


Default Parameter List (DFPL) 


Called by a 
TSO Processing 4 Determines function requested, 
Routine l 
= pe ee es 
| 2 Prefixes userid, if requested, _ 
| a. 
— 
| 
Default | 
Parameter J 3 Adds data set qualifier, if requested, — 
Block ff ~ Searches system catalog, 
( DFPB) /I OR 
0 ] —— = Uses qualifier provided, 
Entry Code | 4 Data Set Name Buffer 
4 
Control p ' Protected Step Control 
8 coderics che 4 _ Address is located in 
LOCATE _!) Returns a copy of added qualifier, DFEPBN fields of DFPB. 
Return Code t Default Qualifier = — SS — if requested, 
Data Set Name Buffer Data Set Name Buffer 


Length of dsname Length 
of fully userid ,dsname, qualifier 


dsname (as provided by terminal user ) ified 
RETURN pao 
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CROSS REFERENCE TABLE 


Default =| IKJEHDEF 
Service 
Routine 


1 Default performs one or more functions depending on the entry and control codes passed in the DFPB, 
The entry and control codes are as follows: 


Entry Control 
Code Function performed by Default Code Flag Function performed by Default 


X'00' Use qualifier provided by terminal user, Bit 2 Prefix given data set name with 
userid, 
X'04' Search the system catalog for descriptive 
qualifiers, [{f more than one exists, build Bit 5 Returns a copy of any added 
a list of possible qualifiers and prompt the qualifier to caller. 
terminal user to choose one, 
Bit 6 Use the qualifier provided by 
Search system catalog for descriptive calling routine, 
qualifiers. Attempt to qualify the data 
set name but don't interrupt the terminal Bit 7 Issue message to terminal user, 


Search system catalog for descriptive 
qualifiers, Accept qualifier provided 
by terminal user; alert him if it is an 
old data set. 


2 Userid is obtained from the PSCBUSER field of the PSCB and is prefixed to the dsname in the data set ADDUSRID 


name buffer, 


Default searches the system catalog by calling the Catalog Information Routine which in turn issues a 
LOCATE macro instruction. 


If a data set qualifier is requested, and one is not supplied Default searches the system catalog by calling CALLCIR 
the Catalog Information Routine. The Catalog Information Routine in turn issues a LOCATE macro 

instruction, If a qualifier is supplied Default finds the qualifier by referring to location pointed to by the 

DFPBQUAL field of the DFPB. 


If the calling routine requests ao copy of the inserted qualifier, Default inserts this copy in the location 
pointed to by the DFPBQUAL field of the DFPB. 
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Section 3: Program Organization 


J 


This section describes the organization of the default service routine. 


The default service routine consists of one load module, IKJEHDEF. As 
Supplied with TSO, the default service routine resides in SYS1.LINKLIB 
Or SYS1.CMDLIB, and requires about 4,000 bytes of main storage. 
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Section 4: Directory 
c 


[This table contains information to help you find the appropriate program 
lescription or assembly listing. 


Stee 5 Acie Tone {+--+ : nena Det ys ae en ee a ee a a 1 
| [ | Load |Assembly| Control | | | 
| Label |Common|Module |module |Section | Description | | 
[ |Name  |Name | Name | Name ; | Diagram | 
}--------- +------ $----- ~~~ $ ~~ ~~ ~~ =f ~~ 2a 2 non f { 
|ADDNAME |-- | IKJEHDEF | IKJEHDEF|IKJEHDEF |Add qualifier to dsname in | 29 [ 
| | | | | | buffer. | | 
| | | | | | _ | | 
J|ADDQUAL |-- | IKJEHDEF | IKJ EHDEF| IKJEHDEF|Attach qualifier to dsname [ 29 | 
| | | | | |buffer. | | 
| | | | | [ . | 
| ADDUSRID |-- | IKJEHDEF | I KJEHDEF | I KJEHDEF |Prefix userid to dsname. | 29 ; 
| | | | | | | | 
|BLDLIST |-- | IKJEHDEF| IKJEHDEF|IKJEHDEF |Build list of qualifiers for 29 | 
| | | H | {terminal user. | | 
| | | | | —— | | 
| BADREPLY |-- | IKJEHDEF | IKJEHDEF| IKJEHDEF|If£ improper reply, tell terminal| 29 | 
| | | | | user. | | 
| | | | . . | | 
[CALLCIR |-- | IKJEHDEF | IKJEHDEF|IKJEHDEF|Call catalog information routine| 29 | 
| | | | | {to find data set qualifiers from| | 
| | | | | [system catalog. [ | 
| | | | | | 
|CHECKRC |-- | IKJEHDEF| IKJEHDEF|IKJEHDEF|Check catalog information | 29 | 
| | | | | J routine return code. | [ 
| | | | | | | { 
\ [CLEANUP |-- | IKJEHDEF | [KJ EHDEF| IKJEHDEF| Restore registers, free core. | 29 | 
| | | | | | 
[CNIRLTST |-- | IKJEHDEF | IKJ EHDEF| IKJEHDEF|Check if message is required. | 29 | 
| | | | | 
{COMPARE |-- | IKJEHDEF | IKJ EHDEF| IKJEHDEF|Check qualifier chosen by [ 29 | 
| | | | | [terminal user against list. | | 
| | | | | | 
[GETQUAL |-- | IKJEHDEF | IKJEHDEF | I KJEHDEF| Prompt for qualifier. { 29 | 
| | | | | | 
JIKIDFLT |-- | IKJEHDEF | IKJEHDEF| I KJEHDEF|Entry point to default. [ 29 | 
| | | | | | | 
| IKJEHDEF |-- | IKJEHDEF| IKJEHDEF | I KJEHDEF|Control section. [ 29 { 
| | | | | | 
| NOTOC [= | IKJEHDEF |] IKJEHDEF| IKJEHDEF|Check if userid is to be added. | 29 | 
| | | | | | | | 
. |RESPONSE |-- | IKJEHDEF | IKJEHDEF| IKJEHDEF |Check response from terminal [ 29 | 
| | | | |user. | | 
| | | ! | | | | 
| TESTRC |-- | IKJEHDEF | IKJEHDEF| IKJEHDEF| Handle PUTLINE return code. | 29 
| | | | | | | | 
| TPUT == | IKJSHDEF | IKJEHDEF| IKJEHDEF|Write a line to the terminal. | 29 | 
| | | | | | 
{TPUTSET |-- | IKJEHDEF | IKJEHDEF| IKJEHDEF| Prompt terminal user to choose a| 29 | 
| | | | | |qualifier. | | 
Pi 5 Cee eee See ee ee ya arp ee eee HB i Set a a eS Se | 
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Section 5: 


Data Areas 


This section contains the major data areas used by the default service 
routine. These areas include: 


CIRPARM 
CS PLARM 
DFPB -- 
DFPL -- 
IOPL -- 


-- Catalog Information Routine Parameter List 
-- Command Scan Parameter List 

Default Parameter Block 

Default Parameter List 

I/O Service Routine Parameter List 


CATALOG INFORMATION ROUTINE PARAMETER LIST (CIRPARM) 


Size: 
Created by: 
Updated by: 
Used by: 


Contents: 


20 Bytes. 

Default (IKJEHDEF). 

N/A. 

Catalog Information Routine (IKJEHCIR). 


Parameter List for CIR (IKJEHCIR). 


re 1 

| Operation | 

[Diagrams | 

| 29 | 
nee 4_--—--__- { 
| Displacement | Field |Size in| | 
| Dec. Hex. | Name | Bytes | Contents | 
}--——---------}--——- ~—---+-—---—- +-----------------------------—-------- { 
| 0 0 | CIRPARM | 4 [CIR option in first byte. Other bytes| 
[ [ [ | are unused. | 
| | _— | 
[4 4 | NAMETTR | 4 [Pointer to data set name or ttr | 
| | [ | (relative address). | 
| | | | | 
[8 8 |CVOLIDPT | 4 |Pointer to CVOL ID. l 
| | | 
[12 C JWKARIPTR | 4 |Pointer to 265 byte work area. | 
| | | | 
[16 10 |WKAR2PTR | 4 | Pointer to 18 word save area. ] 
Ds Be BS a a a Se Se J 
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COMMAND SCAN PARAMETER LIST (CSPLARM) 


Size: Z4 Bytes. 

Created by: Default (IKJEHDEF) using mapping macro IKJCSPL. 

Updated by: N/A. 

Used by: Command Scan Routine (IKJSCAN). 

Contents: Parameter List for Command Scan (IKJSCAN). 
(oso 
|Operation| 
|Diagrams | 
}--------- 
| 29 | 

fo st ‘Se ee et ae ea Ves Fee Ee ee a 4 

| Displacement]| Field |Size in| | 

| Dec. Hex. | Name |Bytes | Contents j 

|------------ }---------- +------- }-----------—------------------------- { 

| 0 O |CSPLUPT | 4 |* UPT. | 
| | | | | 

4 4 |CSPLECrT | 4 jt ECT. | 

| | | | | 

|8 8 | CS PLECB | 4 {# Command processor's ECB. | 
| | | | | 

{12 Cc | CS PLFLG ; 4 |* a flag word. | 

| | | 

)16 10 {|CSPLOA j 4 [# Output area. | 

| | | | 

| 20 14 |CSPLCBUF | 4&4 |¢ Command buffer. [ 

boa i oS es 5 ee eee 5 Sel te a ee ena eer a ee ree eR ee 4 
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DEFAULT PARAMETER BLOCK (DFPB) 


Size: 12 Bytes. 
Created by: Calling program, using a mapping macro IKJDFPB. 
Updated by: N/A. 
Used by: IKJEHDEF. 
Contents: Parameter block for default (IKJEHDEF). 

| Operation| 

|Diagrams | 

| 29 | 
SS eee a ea ee 
| Displacement | Field {Size in| [ 
| Dec. Hex. | Name {Bytes | Contents | 
|------------ }---------- +------- }-------------------------------------- { 
| 0 0 |DEPBCODE | 1 | Entry Code, (X"00°,X‘'O4U',X'08', or | 
| | | |x"0c). | 
| | | | | 
{ 1 1 |DFPBDSN | 3 }¢? data set name buffer. | 
| | | | 
| 4 4 |DFPBCNTL | 1 {Control code. | 
| | | | 
| | | | Bat Meaning when on | 
| { | [0-1 Reserved (0). { 
[ | | |} 2 USERID is to be prefixed. | 
[ | | |3-4 Reserved (0). 
| | { {| 5 Return added qualifier in buffer | 
[ | | | pointed to by DFPBQUAL. | 
l | | 6 Add qualifier pointed to by oo 
| | | | DF PBQUAL. | 
{ | | | 7 Issue message. | 
| | | | | 
ie, 5 |DFPBPSCB | 3 |¢ Protected step control block. | 
| | | | | 
| 8 8 |DFPBLORC | 1 | LOCATE return code. (Code returned | 
| | { {here if LOCATE error.) | 
| | | | | 
| 9 9 |DFPBQUAL | 3 | default qualifier either to be added| 
| | | | by default or that was added by | 
| [ { |default (see bits 5 and 6 of | 
| | | | DFPBCNTL). | 
bee ee [ere ee L J 
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DEFAULT PARAMETER LIST (DFPL) 


Size 16 Bytes. 

Created by: Calling program, using mapping macro IKJDFPL. 

Used by: IKJ EHDEF. 

Contents: Parameter List for Default -- IKJEHDEF. 
Laan 
| Operation| 
[Diagrams | 
a 
| 29 | 

See Se Sr ee ee ae { 

| Displacement| Field [Size in| | 

| Dec. Hex. | Name [Bytes | Contents [ 
|------------}---------- }-------}------------------------------------—] 

{ oO QO |DFPLUPT {| 4 |*¢ User profile table (UPT). | 

| | | | 

| 4 4 |DFPLECT | 4 {# Environment control table (ECT). | 
| | | 

i 8 8 |DFPLECB i 4 |* calling program's event control | 

| | | [Block (ECB). | 

| | | | : | 
j12 C |DFPLDFPB | 4&4 |* Default parameter block (DFPB). | 

L—---_______-4_--_-___-_-4--_--_-4---------- +--+ -------------—-------4 

I/O PARAMETER LIST (IOPL) 

Size: 16 Bytes. 

Created by: Default (IKJEHDEF) using mapping macro IKJIOPL. 

Updated by: N/A. 

Used by: I/O service routines (IKJPUTL and IKJPTGT) 

Contents: Parameter list for I/O service routines. 

Sara a ea | 

| Operation | 

|Diagrams | 

}--------- 

| 29 
foes oe , : ae anne: a SSS SSS= 
| Displacement | Field {Size in| 

| Dec. Hex. | Name [Bytes | Contents 

}------------ +---------- t----—- {-------------------------------------- { 

| 0 0 |IOPLUPT | 4 }¢ UPT. 

| | | | 

14 4  |IOPLECT | 4&4 |* ECT. 

| | | | 

| 8 8 | IOPLECB 1 4 |¢ Command Processor's ECB. 

| | | | 

J12 C |IOPLIOPB | 4 |t I/O service routine parameter block. 

bee De tk ee ei Sa a ae 
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Section 6: Diagnostic Aids 


This section includes the following information: 


e Default Register usage chart, Figure 41. 
e Default Service Routine messages, Figure 42. 
e Default Service Routine Return Codes, Figure 43. 


Oey ne oe ae 9 a OC Eg Tes ig eae Poe UI Oe ee 7 
| Register| Name| Use | 

—=-----}---- }-----------------------------—---—---------------------} 
; 0 | RO |Work register | 
}-------- $~---}-—--—----—---—-------------------------------------—- { 
| 1 | R1 |Parameter register and work register | 
|--—----- }----}----------------—------------------------------------ ! 
| 2 | R2 |Work register { 
}-------- }----}------—----------------------------------------------- + 
| 3 | R3 [Work register | 
|-------- $--~-+-—-------------—-------------------------------------- ! 
| 4 | R& |Work register | 
———<-—— $--—}-—---------—----—---------------------------------------4 
| 5 | R5 |Work register | 
|-—-—_-—-}----} -—-—------- --- -——---------- —------—---—-—----—f 
| 6 | R6 [Contains address of defulat parameter block | 
}-~------ }~----}----------—----—------------------------------------- + 
[ 7 | R7 | Not used | 
[-------- ----{-----------_---—------------—------------------------- t 
| 8 [| R8 |Work register | 
t-------- }----}-—--—------------------------------- == === === === 
| 9 | RY |Work register | 
{-------- $----}----------------—--------------------------------------- { 
| 10 | R10|Work register | 
}-------- $——-—t+-—--—_-~-_-----—_--------- ------------------ 
| 11 [ R11]Work register | 
_-------- }----}-----------------------------~-------------------------- { 
| 12 | R12|Base register for default | 
}—----— }----}-—---------—----------------~----~--------------------- 
[ 13 | R13|Save area register and DSECT base register | 
}-------- }----}-----------—-----------~--—------ === ! 
| 14 | R14|Link register | 
}-------- }----+-------------------------------------------------------- { 
| 15 | R15|Branch and return code register | 
bk Game ee Ue a ees pe ee See me ae een de ener neo ae ee J 


Figure 41. Register Usage: Default Service Routine 
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I.D. |Message Text 
IKJ58600I | QUALIFIERS FOR DATA SET dsname ARE 
IKJ586001|xxxxxxxx XXXXXXXX XKXXXXKX XXXXXXXX 
IKJ586001 | xxxxxxxx 


| 
IKJ58601A| ENTER QUALIFIER- 
*IKJ58601A|DATA SET NAME WAS NOT FULLY QUALIFIED. ENTER DESIRED 
| QUALIFIER FROM ABOVE LIST- 


| 
IKJ58602I| INVALID QUALIFIER xxxxxxxx 


| 
1 KJ58603A| REENTER- : 
*#1KJ58603A| ONLY QUALIFIERS LISTED ARE VALID QUALIFIERS FOR THIS DATA 
|SET NAME. REENTER DESIRED QUALIFIER FROM ABOVE LIST- 
#1KJ58603A| QUALIFIERS CONTAIN FROM 1 TO 8 ALPHANUMERIC CHARACTER. 
| REENTER- 


| 
IKJ58604A|ENTER OLD OR NEW QUALIFIER- 
#1 KJ58604A|DATA SET NAME WAS NOT FULLY QUALIFIED. ENTER NEW QUALIFIER 
{OR ONE FROM ABOVE LIST- 
| 
IKJ586051I| DATA SET NAME dsname NOT COMPLETE 
| 
IKJ58606A| ENTER QUALIFIER FOR dsname- 
#1 KJ58606A|DATA SET NAME WAS NOT FULLY QUALIFIED. ENTER NEW 
| QUALIFIER- 
| 
IKJ586071|DATA SET dsname IS ABOUT TO BE REUSED 


| 
IKJ58608A| ENTER CARRIER RETURN TO CONTINUE OR ATTENTION TO RESPECIFY 
| COMMAN D- 


eee ee ee ee ee ee oe ee ee ee es ee es oe 0 ee 2 ee ee ee a ee aes oe 


| 
I1KJ586091I|DATA SET NAME dsname CANNOT BE RESOLVED, SYSTEM ERROR+ 
| *IKJ58609I|PUTLINE ERROR CODE xxxx 
|*IKJ586091I|PUTGET ERROR CODE xxxx 
| *IKJ58609I| LOCATE ERROR CODE xxxx 


——= == qu auyeh GE coe oes cee ee eee es ee oe 2 ee ee eo ee ee ee ees ee ee eee eee ee ee ee ee ee 0 oh 


| | 
| TKI586101| DATA SET NAME dsname NOT FULLY QUALIFIED 


piace 42. Messages: Default Service Routine 
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Re cect Te ae ae ee er eo eT ee 1 
|Return| |Possible Return Code by| 
| Code | Meaning of Return Code | side Code | 
| (Dec. ) { t Sate ae gee Viet eo ah eee as Sep = eb { 
| | [X'O00"|x'04 are og* |x" oc* | 
|------}----------------------+---------------- $-----}-----}-----+-----} 
| 0 |Successful operation. { xX | xX | xX |X | 
t------ }--------------------------------------- -----}-----4-----+-----4 
| 4 |Unable to obtain qualifier from | | x | | X | 
| |terminal user. (PUTLINE or PUTGET { | { | | 
| | error). | | | | | 
|------}--------------------------------------- +-----+-----4-----+-----} 
| 8 |With qualifiers added, data set length | xX | xX | xX | X | 
| |is greater than 44 bytes. | | | | | 
|------}--------------------+------------------ +-----}-----+-----}-----} 
{| 12 |Permanent I/O error in the system | x | xX | xk |X | 
| | catalog, catalog data set not | | | | | 
{ Javailable, or syntax error in data set | | | | | 
| J[name. (The LOCATE return code was | | | | | 
| [X'O4", X°14", or X‘'18'.) | | | | | 
t------ }--------------------------------------- $-----4-----4-----+-----] 
| 16 |Data set exits at some level of index | xX | xX |] xX | xX | 
| Jother than the lowest index level | | | | 
| |specified. (The LOCATE return code was| | | | | 
[x"10"). | | | | | 
}--~---+--------------------------------------- $-----+-----+-----+----] 
| 20 |One of the data set names was not | xX | xX | xX |X | 
i j{found. (LOCATE Return Code of X‘'08'*.) | | i | | 
}------}----~--------------~------------------- $--=--}-----$-----+----- 
} 24 |Attention interruption occurred. | xX | xX | xX |X | 
| ------}~----------------------—--------------- {-----}-----}-----+-----} 
| 28 |Invalid parameter: | x | xX | xX | xX | 
| | @ Invalid entry code, | | | | | 
| {| © Data set length not halfword | | ; | | 
| | aligned, | | | | | J 
| | © Data set length greater than 44 [ | | | | 
| | bytes, or | | | | | 
| | © Data set length of 0, except with | | [ | { 
'Z | entry code of X*00°. | | | | | 
|------}~---------------------------~---------- 4-----}--~--4-----+-----] 
{ 32 |Prompting is necessary to qualify data | | | x | | 
| [set name. | | | | | 
p-n2---f——- $2 =~ ~~ ----- $-~---}--=--4-----}----- 
{| 36 |No qualifiers found. (LOCATE return {| x | xk | x |x | 
| peode X*OC*.) | | | | | 
a es ae oe ee al eee 8 NO ae ee aE ae ne ae ae EE Seta a We ee yaar aes aera J 


Figure a. Return Codes: Default Service Routine 
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Section 1: Introduction 


This description of the catalog information routine assumes that the 


reader has a knowledge of the information contained in the OS/VS Catalog 
Management Logic, SY¥35-0003. 


The catalog information routine (IKJEHCIR) retrieves information from 
the system catalog. This information may include data set pened index 
name, control volume address, or volume ID. 


A fully qualified data set name has three fields: a userid, a data 
set name, and a descriptive qualifier. For example: 
Insert B 
SMITH .ACCTS.DATA 


Userid (identification ied 


Data set name (supplied by terminal user) 


Descriptive qualifier 


For a more detailed description of data set naming conventions, refer 
to OS/VS2 TSO Command Language Reference, GC28-0646. 


An index name is the name as found in one of the fields of the fully 
qualified data set name. The system catalog is logically divided into 
levels of indexes as follows: 


Insert C 


SMITH == 


ACCTS — Levels of Index 


——). of} 


DATA oa 


A control volume address is the location of any direct access volume 
which contains a portion of the system catalog. 


The volume ID is the volume serial number (VOLSER) of an area within 
auxiliary storage, independently accessed and identified. 


The routine that calls IKJEHCIR must supply the userid and the data 
set name, or it must supply the address of the information requested. 
The catalog information routine issues the LOCATE macro instruction to 
search the catalog and return an index block. An index block is a 
portion of the system catalog containing one or pointers to other index 
blocks or to data sets. 
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The catalog information routine then reads the index block, 
compresses and reformats the information that it contains, and returns 
the requested information to the caller. If additional information is ' 
available at this level of index, the routine informs the calling 2 
routine and gives it the address of the next index block. The calling 
routine may again call the catalog information routine to retrieve an 
additional portion of the index by specifying this address. 


The catalog information routine resides in SYS1.LINKLIB or in 
SYS1.CMDLIB and executes in the user's foreground region with the 
protection key assigned to that region. An installation may choose to 
make the catalog information routine resident in the TSO link pack area 
(TSLPA) in the region assigned to the Time Sharing Control Task (TSCT). 
The catalog information routine requires about 800 bytes of main 
storage. 
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Section 2: Method of Operation 


Method of Operation Diagram 30 shows how the catalog information routine 
(IKJEHCIR) obtains information from the system catalog. 


The catalog information routine works this way: 


When the default routine, or any other TSO problem program, needs 
information from the system catalog, it calls the catalog 
Information Routine and passes, in register 1, the address of the 
catalog information routine parameter block (CIRPARM). 


The first byte of CIRPARM contains an option code, which defines the 
service requested (for example, X‘01‘ returns the lowest level 
qualifier associated with the data set name). 


The catalog information routine sets up a parameter block and 
invokes the LOCATE macro instruction. The LOCATE macro issues an 
SVC 26 to search the system catalog. SVC 26 uses userid and data 
set name, Or an address to search the system catalog. LOCATE 
returns the requested information, which may be data set names, 
volume address, or volume ID, in the work space provided by the 
catalog information routine. 


On return from the LOCATE routine (IGGOCLC1), the catalog 
information routine checks the validity of the returned information 
against the request, reformats the returned information, and returns 
to the caller. 


ENrRY TO CATALOG INFORMATION ROUTINE 


The catalog information routine receives control by a CALL or LINK macro 
instruction at entry point IKJEHCIR. At entry, register 1 points to the 
catalog information routine parameter list (CIRPARM). CIRPARM contains: 


An option code requesting a particular service, see Figure 44 
catalog information routine option codes, for options and resulting 
functions. 


An address of the search argument. This search argument may be 
either: 
- A userid and a data set name, which are names of catalog index 
levels, or 
- A ttr, which is an address relative to the beginning of the 
system catalog. 
An address of volume identification of a control volume -- the 
volume containing a portion of the system catalog referred to by the 
relative address in the search argument. 


Address of work area; this area is supplied by the calling program 
(on a double word boundary). 


Address of save area; this area is supplied by the calling program. 


she catalog information routine returns to the calling program using a 
RZTURN macro instruction. All registers except 15 are restored. At 
exit, register 15 contains a return code. (See Figure 46, Catalog 
Information Routine Return Codes.) 
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Option Option 
Code Requested 


X'O1' Data Set 
Name 


X'Q2' Index 
Name 

X'04' Volume 
List 


Response to Caller 


Returns all the lowest level qualifiers contained within one index block, 


07 dsname 
l 8 


This nine-byte entry represents a lowest level data set name. 


02 gdgname ttr data 
l 8 3 4 


This 16-byte list entry represents a generation data group (gdg). 

A generation data group is the entire collection of chronologically related data sets 
which can be referred to by the same data set name, For further discussion on 
generation data groups, refer to IBM System “360 Operating System Data 


Management Services, GC26-3746. The data field contains tour bytes describing 
the characteristics of the group, This data field contains the following: 


Byte 1-2 Not used by Catalog Information Routine 


Byte 3-4 Count of generations currently in the index, 


Returns one lower level qualifier. 
00 dsname tte 


1 8 3 


This 12-byte list entry contains a data set name qualifier, The ttr points to the 
beginning of the index containing this data set name, 


Returns a listing of volumes associated with the search argument. 


| 4 6 2 4 6 


ct Number of volume serial numbers described. 


code Four-byte device code, (Device code designations are shown in IBM 
System/360 System Programmer's Guide, GC28-6550. ) 


Volume serial number. 


Sequence number, for tape devices, 


Figure 44. Option Codes: Catalog Information Routine (Part 1 of 2) 
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Option Option 
Code Requested Response to Caller 


] 
Cc X'05' | Control Returns all the lowest level qualifiers contained within one index block and the address of the 
volume volume containing the associated block, 
address 
and data 
i set name, 
dsname ct | code| volserl code ! volsern 
I 8 l 4 6 2 4 6 
ct -- Number of volume serial numbers described, 
code -- Four-byte device code, 
volser -- Volume serial number, 
seq ~- Sequence number, for tape devices. 
X'08' | Volume ID Return Volume Identification, 
l 8 3 8 


This 20~-byte list entry represents an alias found in the system catalog. Aliases exist only in 
the volume index, which is the highest level index. The FTR points to the first block of the 
index, 


coe 
1 


8 4 6 


Y This 19-byte list entry represents a catalog volume pointer found in the volume index, The code 
identifies the device type on which the control volume might be mounted. (This field will be 
zero, if the catalog was constructed prior to Release 17). The volser identifies the control 


volume (CVOL), 


X ‘FF! Termination list entry. 
1 3 6 


This ten-byte list entry terminates every list regardless of options specified. If this list contains 
the end of an index, the ttr is zero; otherwise the ttr is the relative address of the next index 
block, The volser contains the volume identification of the volume containing the catalog 
being used, 


Figure 44. Option Codes: Catalog Information Routine (Part 2 of 2) 
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Method of Operation Diagrams 
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BBE 


(IT eSeeTey ZSA) werzbord 1AO}TUOW TeuTMAa], ZSA/SO 


INPUT PROCESS RESULT 


Catalog Information Routine (IK JEHCIR ) 
SYSTEM 


Searches System Cotolog using CATALOG 
Called by a TSO LOCATE macro instruction, 
Processing Routine C. 
: | 1 Determines function requested. Le eS Oe 
Register | / se 


| ieee einen catia tation = . 
2 Searches system catalog for - ~ rae 


nomes or addresses, 


3 Compresses ond reformats the 
information from the system catalog. 


Option 
Code 


N Index name or an address in 
control catalog 


Volume id of CVOL 
4 256 byte work area 
4 72 byte save area 


Returns the "list of entries" to --——— 


the caller, Address is located in 


CIRWK1 field of 
CIRPARM 


Work Area (256 bytes) 


List of entries 
RETURN containing the 
requested 


information, 


[Index name or address relative to 
beginning of system catalog 
\ 


\ 
\ 


Note: Prefixed witha "I" 
if it contains an address 
relative to the beginning 
of the system catalog, 


Method of Operation Diagram 29. Catalog Information Routine 
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weribetq uoryzerzadoO JO poy iow 


BE 


CROSS REFERENCE TABLE 


Catalog IK JEHCIR 
Information 


Routine 


The Option Codes are as follows: 


Option Byte 


Response to Caller 


X'01' Returns all the lowest level qualifiers 
contained within one index block, 


X'02' Returns a lowest level index name, 
X'04' Returns a listing of volumes. 


X'08' Returns volume information. 
fhe Catalog Information Routine issues the LOCATE LOCATE 
macro instruction, which in turn issues a SVC 26, 
The index block from the system catalog, which is CODE 00 
returned by LOCATE, is reformated and returned 
to the caller. 


Method of Operation Diagram 30. 


STRUCTURE OF SYSTEM CATALOG * 


Logical Structure 


Three 


INVENTRY Index 


a Levels 
ASSETS | ONHAND | — 


Fully qualified names represented: - SMITH.ACCTS,DATA 
- SMITH, ACCTS, ASSETS 
- SMITH, INVENTRY, NEW 
- SMITH. INVENTRY, ONHAND 


Pe | Volume Index 
ie Pace 
S2- Pointer to index 
SMITH 


Physical Structure 


Volume Table 
of Contents 


Volume Index 


(userid ) 
| 

| ae ee Oe ee 
eoelinien) a= GNTAND es | 

SMITH, INVENTRY, NEW SMITH. INVENTRY , ONFAND 
Data Sets 

SMITH, ACCTS, ASSETS SMITH, ACCTS, DATA, 
Data Sets 


* Note: Pointers refer to beginning of index or data set, 


Catalog Information Routine (Part 2 of 2) 


Section 3: Program Organization 


This section describes the organization of the catalog information 
routine. 


The catalog information routine consists of one load module, IKJEHCIR. 
AS Supplied with TSO, the catalog information routine resides in 
SYS1.LINKLIB or in SYS1.CMDLIB, and requires about 800 bytes of main 
storage. 
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Section 4: Directory 


This table contains information to help you find the appropriate program 
description or assembly listing. It correlates information from three 
sources: 


e The source code. 


e The executable load modules. 
e This manual. 


aa T T —T T Tea ee ge a Me ey ae 1 
| | | Load |Assembly|Control | | | 
[ |Common|Module |Module |Section | | 
| Label |Name |Name | Name | Name | Description | Diagram | 

------- $------}--------} -------- 4 --—---- f------- == --- === === -- === ----- f= === -- === | 
|CHKTYPE | -- |IKJEHCIR|IKJEHCIR| IKJEHCIR| Examine entry in catalog block. | 30 | 
| | | | | 
J}CODEOO | --  |IKJEHCIR| IKJEHCIR| IKJEHCIR|Process LOCALE return code of | 30 | 
| | | | | zero. | | 
| | | | | | | 
|DSENTRY | --  |IKJEHCIR|IKJEHCIR|IKJEHCIR| Process data set entry. {| 30 | 
| | | | | | | | 
JIKJEHCIR| --  |IKJEHCIR| IKJEHCIR] IKJEHCIR|Control section name and program | 30 | 
RE OE, es OE rt 
JINDEXPTR| -- |IKJEHCIR|IKJEHCIR| IKJEHCIR|Process link or index entry. {[ 30 { 
| | | | | | | | 
[LOCATE | --  |IKJEHCIR|IKJEHCIR| IKJEHCIR| Issue LOCATE macro instruction. | 30 | 
| | | ; | | 
|VOLPTR | -- |IKJEHCIR| IKJEHCIR| IKJEHCIR|Process volume control block. {| 30 | 
eee eens : ees \ eee dee eee eee Mt Ss eR pe ed on eae ee a pp ae ae ere Pe pee en Pee y eee eee J 
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Section 5: Data Areas 


This section describes the catalog information routine parameter list 
(CIRPARM) and the parameter list for LOCATE (CAM2). The following 
information is included: 


e Size in bytes. 


e The routines that created it. 
e Displacements, size and contents. 


CATALOG INFORMATION ROUTINE PARAMETER LIST (CIRPARM) 


Size: 20 Bytes. 

Constructed by: The calling program. 

Updated by: None. 

Used by: IKJEHCIR. 

Contents: Addresses and control information for IKJFHCIR. 
| iain raaraas 
| Operation| 
[Diagrams | 
| 30 | 

" ee : a {----> 7c aS ES a sae { 

| Displacement |Field |Size in|] | 

| Dec. Hex . | Name |Bytes | Contents | 

}—___------ ~-~-------}-—--_} -------------------------------------- { 

| oO 0 | CLIROPT | 12 [Options used. See Figure 41. | 

| | | 

J 1 1 {| == { 3 |Not used. | 

| | | | 

; 4 4 | CIRSRCH {| 4 |# data set name or relative address. | 

| | | {| (This field is prefixed with a "1", if| 

| | | Jit contains a relative address. It is| 
| | | [prefixed with a "0" if it contains the| 
| | | Jaddress of a data set name.) | 
| | | | 
| 8 8 | CIRCVOL i 4 {# volume ID of CVOL. (If not given, | 
| l | |SYSRES is assumed.) | 
| | | | 

}12 Cc { CIRWA | a |* 265 byte work area, aligned on a | 

[ | | j|double word boundary. | 

| | | | | 

[16 10 |CIRSAVE ; 4 j{* 72 byte save area. | 

sete ae ee eaten et 5 ne eet eer tat at er as J 


392 OS/VS2 Terminal Monitor Program (VS2 Release 1) 


CAMLST BLOCK (CAM2) 


Size: 16 Bytes. 

Constructed by: IKJEHCIR. 

Updated by: IKJEHCIR. 

Used by: SVC 26. 

Contents: Addresses and control information for SVC 26 


(Parameter list for input to SVC 26, which is 
issued by LOCATE macro instruction). 


cn as 1 
|Operation| 

[Diagrams | 

| 30 | 

(==-===- == —T---------- ~——-S-=—= fs cae aaa mica ae | 
| Displacement] Field {Size in| | 
| Dec. Hex. | Name [Bytes | Contents | 
|------------ $---------- $------- $-------=-------------- === === === ------ { 
| 0 0 ; -- ; 1 }Option flag 1. | 
| | | |X*'C2" Search by Block | 
i | ; |X*c4* Search by Name } 
| | | | | 
{| 1 1 | -- | 1 {Option flag 2*. | 
| | | | | 
| 2 2 | -- ; 1 {Option flag 3%. | 
| | | | | 
| 3 3 t -- | 1 |Not used by IKJEHCIR (0). | 
| | | | | 
| 4 u | -- | 4 | Pointer to data set name search | 
| | | jargument. | 
| | | | | 
| 8 8 | -- | 4 j; Pointer to the control volume serial | 
| } | | number. | 
| | | . | 
{12 Cc | -- } 4 |Pointer to work area, aligned ona | 
H | | |double word boundary. | 
}------—-_--- p peepee eee aera ete f ere eee ee tei a pe ea f 


|*Set to all zeros by IKJEHCIR to indicate a request to locate an entry| 
| in the catalog. | 
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Section 6: Diagnostic Aids 


This section contains: 


e Catalog Information koutine Register usage chart (Figure 45). 
e Catalog Information Routine return codes (Figure 46). 
e LOCATE macro instruction return codes (Figure 47). 


fe ee 7 SSS SSC aa a a a aR A a 1 
| Register | Name | Use | 
[-------- $—- ~~} nnn nnn nnn nnn nnn nnn nnn nnn nnn { 
| 0 | RO |Not used. 
|-------- }----}-------------------------------------------------------- ! 
| 1 | R1 |Points to current entry in work area. | 
[-------- }----}-------------------- == 5 = <= 25-5 nn nnn nnn { 
| 2 | R2 |Points to current entry in block. | 
[-------- }----}---------------------~---------------------------------- ! 
| 3 | R3 |Work register. | 
{—-~---- }~---}-------~------------~----------------------------------- { 
{ 4 | R4Y |Contains parameter list address. | 
|-------- t----}--------------—------—--~----—--—------------------- { 
{ 5 } RS |Contains option bits. | 
}-------- }----}-------------------------------------------------------- { 
| 6 | R6 |Work register. | 
}-------- ----}-----—--------—---------- mannan nnn nnn enn } 
| 7 | R7 |Points to LOCATE work area. | 
}-------- }----}~-----------------------------------------------------— { 
| 8 | R8 |Not used. | 
[-------- }----}~---------------~--------------------------------------- t 
| 9 | RI | Not used. | ‘ 
}-------- }----}-------------------------------------------------------- { 
| 10 | R10|Not used. | 
}-------- t----+~----~-----------------------—---—---------------------- ! 
| 11 | Ri1l|Main base register. | 
}-------- }----}---------~--------------------------------------- === === { 
| 12 | R12|Not used. | 
|-------- +----+----------------- + -------------------------------------- ! 
| 13 | R13|Save area address. | 
}-------- }----}----------=------- -------------- === == === === { 
| 14 | R14|Return register. | 
[-------- frm n npn nnn ns nnn nn nnn nnn nnn nnn nnn i 
| 15 {| R15]Return code. | 
Pee ON ne a a ae a 4 


Figure 45. Register Usage: Catalog Information Routine 
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T 
|Return| | 
| Code |Meaning | 


QO |Successful completion of the request. 


| | 
| | 
| 4 |The LOCATE macro instruction has failed. The LOCATE return | 
| |code will be stored in the first word of the user's parameter | 
| Jlist. The catalog information Routine interprets and handles | 
| LOCATE return codes 00 and 12 -- LOCATE return codes are shown | 
| Jin Figure 45. | 
| | | 
| 8 |Volumes alone were requested (entry code X‘'04'), but neither a | 
|dsname or a ttr to a volume control block was given, and an | 
| | index block was found instead. The index block that was found | 
| Jis in the work area. | 
| | | 
| 12 |Volumes were returned by LOCATE, indicating either a dsname | 
| | (fully qualified) or a ttr was passed in the parameter list, | 
| [but options other than volumes were requested. The list of the| 
| {volumes returned by LOCATE is in the work area. 

eer a a ae ee J 


Figure 46. Return Codes: Catalog Information Routine 


1 
| Return | | 
| Code |Meaning | 
|------}~-----=-------------------------------------------------------- ! 
| QO  |Successful completion of the request. ) 
| | 
| 4 |Either the required control volume was not mounted or the | 
| |specified volume does not contain a catalog data set (SYSCATL).| 
| | | 
| 8 |The data set name qualifier was not found. | 
| | | 
| 12 |Success -- but more names are available. | 
| | | 
{ 16 |A data set resides at a higher level of index than was | 
| jrequested. For example: data set A.B.C exists but A.B.C.D was| 
| | requested. | 
| | | 
|} 20 |A syntax error exists in the data set name. | 
| | 
{| 24  |A permanent I/O error was found when processing the catalog. 
| | | 
| 28 |Relative track address supplied is out of the SYSCTLG data set | 
| Jextents. ; 
| | | 
| 32 |Invalid work area pointer. | 
eee erneleaera CR a i aay NPL eae fe SP ok PO ee Py SON A ony SI ea pea a ee PE J 


Figure 47. Return Codes: LOCATE (IGGOCLC1) 
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The following definitions are for the use 
of these terms in this publication. If you 
do not find the term you are looking for, 
refer to the Index or to the IBM Data 


Processing Glossary, GC20-1699. 


abnormal end of task (ABEND): Termination 
Of a task prior to normal completion 
because Of an error condition. 


address-constant: A number, or a symbol 
representing a number, used in calculating 
storage addresses. 


alias: An alternate name for a particular 
member of a partitioned data set. 


allocate: To assign a resource for use in 
performing a specific task. 


allocation of data sets: The process of 
defining a data set and defining auxiliary 
storage space. See also dynamic 
allocation. 


alphameric characters: The characters A 
through 2Z, digits 0 through 9, and #, §$, 
and a. 


ATTACH: A macro instruction that causes 
the control program to create a new task 
and indicates the entry point in the 
program to be given control when the new 
task becomes active. 


attention exit routine: A routine that 
receives control when an attention 
interruption is received by the system. 


attention interruption: An interruption of 
instruction execution caused by a remote 
terminal user hitting the attention key. 
See also simulated attention. 


attention key: A function key on remote 
terminals that causes an interruption of 
execution by the CPU. 


Attention Scheduler: A part of the Region 
Control Task that gets control when the 
terminal user causes an attention 
interruption. The Attention Scheduler 
passes control to the appropriate attention 
exit routine. 
attributes: See user attributes. 

auxiliary storage: Data storage other than 
main storage (for example, storage on tape 
or direct access devices). 


Glossary 


background: In TSO, the environment in 
which jobs submitted through the SUBMIT 
command or SYSIN are executed. One job 
step at a time is assigned to a region of 
Main storage, and remains in storage to 
completion. Contrast with foreground. 


background job: In TSO, a job entered 
through the SUBMIT command or SYSIN. 
Contrast with foreground job. 


background reader: A system task started 
by the operator to process 
foreground-initiated background jobs. 
Output is identical to the normal 
reader/interpreter output. 

break: See receive interruption. 
broadcast data set: A system data set 
containing messages and notices from the 


system operator, adminstrators, and 
terminal users. 


buffer: See main storage buffer, command 
buffer. 
byte: The representation of a character; 


eight binary digits (bits) operated upon as 
a unit. 


catalog: 
1. A collection of data set indexes that 


are used by the control program to 
locate a volume containing a specific 
data set. 

2. To include the volume identification 
of a data set in the catalog. 


cataloged data set: A data set whose name 
and location are stored in the system 
catalog. 


Catalog Information Routine: A routine 
that retrieves information from the system 


catalog for any TSO command processor. 


cataloged procedure: A set of job control 
Statements that has been placed ina data 
set named SYS1.PROCLIB and that can be 
retrieved by naming it ina job control 
language (JCL) execute (EXEC) statement. 


character: A letter, digit, or other 
symbol that is used as part of the 
organization, control, or representation of 
data. For example, A,B,C,0,1,2, ,+,*,etc. 


character-deletion character: A character 


within a line of terminal input specifying 
that it and the immediately preceding 
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Character are to be removed from the line 
Dy a scanning and editing routine. 


character string: Any sequence of 


characters. 


command: Under TSO, a request from a 
remote terminal for the execution of a 
particular program, called a command 
processor. The command processor is ina 
commmand library under the command name. 
Any subsequent commands processed directly 
by that command processor are called 
subcommands. 


command buffer: An area Of main storage 
that is assumed to contain a TSO command 
submitted by the terminal user. 


command language: The set of commands, 
subcommands, and operands recognized by 
TSO. 


command library: A partitioned data set 
consisting of command processor programs. 
A user command library can be concatenated 
to the system command library. 


command name: the first term in a command, 
usually followed by operands. 


command procedure: A data set or a member 
of a partitioned data set containing TSO 
commands, to be performed sequentially by 
the EXEC command. 


command processor: A problem program 
executed as the result of entering a 


command at the terminal. Any problem 
program can be defined as a command 
processor by assigning a command name to 
the program and including the program in a 
command library. 


Command Scan: A TSO service routine that 
searches the Command Buffer for question 
mark, command name, or null line. If 
syntax checking is requested, Command Scan 
checks the command name to be sure that it 
Starts with an alphabetic character and 
contains no more than 8 alphanumeric 
characters. 


control block: A storage area that 
contains a particular type of information 


used by the operating system to control the 
use of system resources. 


control program: All the routines in the 
operating system that contribute to the 
management of resources, programs, and data 
and implement the data. 


control section (CSECT): The smallest 
separately relocatable unit of a program; 
that group of coding specified by the 
programmer to pe an entity, all elements of 
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which are to be loaded into contiguous main 
storage addresses for execution. 


control volume: A volume that contains one 
or more indexes of the catalog. 


Ir 


: See “command processor." 


oO 


AIR: See Dynamic Allocation Interface 
Rout ine. 


data definition name (ddname): A name 
appearing in the data control block 
assigned to a program; the name is 
specified in the name field of a data 
definition (DD) statement. 


data management: A general term that 
collectively describes those functions of 
the control program that provide access to 
data sets, enforce data set conventions, 
and regulate the use of input/output 
devices. 


data set allocation, dynamic: See dynamic 


allocation. 


data set catalog: See catalog. 

Data Set Extension (DSE): A control block 
that contains information about a terminal 
user's data sets, including the 
relationship between DDNAMEs and DSNAMEs. 


data set Organization: The arrangement by 
data management of information in a data 
set. For example, sequential orgainzation 
Or partitioned organization. 

data set name: The term or phrase used to 
identify a data set. See also qualified 


name. 

DDNAME: See data definition name. 
default: See default value. 
Default: <A TSO service routine that 


constructs a fully qualified data set name 
when provided a partially qualified data 
set name by the calling routine. 
Default Parameter Block (DFPB): An area of 
main storage used to contain codes and 
addresses required when calling the Default 
service routine. 


default value: the choice among exclusive 
alternatives made py the system when no 
explicit choice is specified by the user. 


delimiter: A character used to group 
and/or separate fields ina line: of input. 


device type: The general name for a 
device, specified at system generation. 
For example, 2311 or 2400. 


(VS2 Release 1) 


C 


DSE: See “Data Set Extension." 


DSNAME: See “data set name." 


dynamic allocation: The process of 
defining a.data set and allocating 


auxiliary storage space for it during job 
step execution rather than before job step 
execution. 


Dynamic Allocation Interface Routine 
(DAIR): A TSO service routine that 
performs various data management functions. 


ECT: See “Environment Control Block." 


Environment Control Block (ECT): A control 
block that contains information about the 
user*’s environment in the foreground 
region. 


foreground: In TSO, the environment in 
which programs are swapped in and out of 
Main storage to allow CPU time to be shared 
among terminal users. All command 
processor programs execute in the 
foreground. Contrast with background. 


foreground job: In TSO, any job executing 
in a fereground region, such as a command 
processor or a terminal user's program. 
Contrast with background job. 


GETLINE: A TSO service routine used by 
command processors to obtain input. 


group name: The name for a particular 
collection of devices, specified at the 
time the system is generated. For example, 
SYSDA or TAPE. 


HELP command: A TSO command that provides 
the terminal user with reference 
information on command and subcommand 
syntax, function, and usage. 


IKJDAIR: An alias load module name for the 
Dynamic Allocation Interface Routine. 


IKJEHCIR: The load module name for the 
Catalog Information Routine. 


IKJDEFLT: An alias load module name for 
the Default service routine. 


IKJEHDEF: The load module name for the 
Default service routine. 


IKJPARS: The load module name for the 
Parse service routine. 


IKJPUTL: The entry name for the PUTLINE 
service routine. 


IKJPTGT: The load module name for the 
STACK, GETLINE, PUTLINE and PUTGET service 
routines. The entry name for the PUTGET 
service routine. 


IKJSCAN: The loa’ module name for the 
Command Scan service routine. 


informational message: Output ona 
terminal that tells the terminal user the 


status of the system and of his terminal 
session. 


index name: In TSO, one of the fields of a 
qualified data set name. 


Input Stack: A push-down list of sources 
of input for GETLINE and PUTGET. Possible 
sources are the terminal or an in-storage 
list. 


in-storage list: A chain of input lines in 
Main storage, such as commands in an EXEC 
procedure, that are used in place of 
terminal input. 


interruption: A transfer of CPU control to 
the control program of the Operating 
System. The transfer is initiated 
automatically by the computing system or by 
a problem state program through the 
execution of a supervisor call (SVC) 
instruction. The transfer of control 
occurs in such a way that control can later 
be restored to the interrupted program, or, 
in systems that perform more than one task 
at a time, to a different program. 


I/O Service Routine List (IOSRL): A 
control block which contains the address of 
the first element (bottom element) and the 
most recently added element (top element) 
of the input stack. The GETLINE and PUTGET 
service routines can refer to the IOSRL, 
but only the STACK service routine can 
update it. 


IOSRL: See I/O Service Routine List. 


job control statement: Any one of the 
control statements in the input job stream 


that jdentifies a job or defines its 
requirements. 


job definition: A series of job control 
statements that define a job. 


job management: A major function of the 
operating system involving the reading and 
interpreting Of job definitions, the 
scheduling of jobs, the initiation and 
termination of jobs and job steps, and the 
recording of job output data. 


keyword parameter: A command cperand that 
consists of a specific character string 
such as FORTLI3 or PRINT. See also 
positional parameter. 


line deletion character: A terminal 
character that specifies that it and all 


preceding characters are to be deleted from 
a line of terminal input. 


Glossary 399 


A line of one or more characters 
typed at a terminal. See also logical 
physical line. 


TO place a program into main storage 
so that it can be executed. 


load module: The output of the linkage 
editor; a program in a form suitable for 
loading into main storage for execution. 


logical line: One or more lines typed ata 
terminal and treated as a unit. A logical 
line may consist of one or more physical 
lines where the symbol *%-" indicates 
continuation. See also physical line. 


logical record: A record that is defined 
in terms of the information it contains 
rather than by its physical qualities. 


LOGON/LOGOFF Scheduler: The TSO control 
program routine that initiates and 
terminates a terminal session. 


Main storage buffer: An area Of main 
storage that iS temporarily reserved for 


use in performing an input/output 
operation. 


mode message: A message that requests the 
terminal user to enter a line of input. 


multi-level message: A chain of 
informational messages. The first message 


is the most general; the last message, the 
most detailed. 


multi-line data: A chain of data lines. 
PUTLINE sends one line after another to the 
terminal until end-of-chain is reached. 


national characters: 
and @. 


The characters #, '$, 


& 
3 


OLD: See Output Line Descriptor. 

operand: In the TSO command language, 
information entered with a command name to 
define the data on which a command 
processor operates and to control the 
execution of the command processor. Some 
operands are positional, identified by 
their sequence in the command input line. 
Other operands are identified by keywords. 


output buffer: An area Of main storage 
used to store a data block before it is 
transferred to an output device. 


Any one of up to 36 
defined at 
to which output data can 


output class: 
different output data classes, 


an’installation, 
be assigned. 


output device: A machine (such as a 
printer, terminal, or tape drive) that will 
accep® the output from the system. 


Output Line Descriptor (OLD): An area of 
main storage used to describe information 


to be sent to the terminal by the PUTLINE 
and PUTGET service routines. 


output writer: The part of the job 
scheduler that controls the writing of job 
output data. 


Parameter Control Entry (PCE): An entry in 
the Parameter Control List (PCL). In 


general, each PCE describes an acceptable 
TSO command parameter or marks the 
beginning or end of a field. Each PCE is 
created by a Parse macro instruction as 
shown in Table 6. 


Parameter Control List (PCL): A data area 
that contains control information for the 
Parse service routine. Each element in the 
list is called a Parameter Control Entry 
(PCE). 


Parameter Descriptor Entry (PDE): An entry 
in the Parameter Descriptor List (PDL). In 


general, each PDE describes a TSO command 
parameter entered by the terminal user or 
supplied by default. 


Parameter Descriptor List (PDL): A data 
area that describes the TSO command 


parameters entered by a terminal user or 
supplied by detault. Created by the Parse 
service routine. Each element in the list 
is called a Parameter Descriptor Entry 
(PDE). 


E: See Parameter Control Entry. 


PCL: See Parameter Control List. 

PDE: See Parameter Descriptor Entry. 

PDL: See Parameter Descriptor List. 

Parse: A TSO service routine that searches 


the Command Buffer for TSO command 
parameters, checks them for correct syntax, 
and optionally presents them to a 
user-supplied validity check exit routine. 


partitioned data set: A data set that is 

stored in direct access storage and can be 
cataloged like any other data set. It is 

divided into independent partitions called 
members, each of which normally contains a 
program or part of a program. 


password: A one- to eight-character symbol 
assigned to a user that he can be required 
to supply at LOGON. The password is 
confidential, as opposed to the user 
identification. Users can also assign 
passwords to data sets. 


physical line: A line typed at a terminal. 
See also logical line. 
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physical record: A record that is defined 
in terms of physical qualities rather than 
by the information it contains. (See 
record.) 


positional parameter: A command operand 
which must appear in a certain order, in 


relation to other operands. Contrast with 
keyword parameter. 


POST/WAIT: A POST macro instruction 
followed by a WAIT macro instruction. The 
purpose is to cause a task switch from the 
task issuing the POST/WAIT to the task 
whose ECB is posted. The task switch does 
not occur until after the WAIT is issued. 


procedure list: An in-storage list that 
contains TSO commands. 


problem program: A program which executes 
in the problem state, is restricted from 
executing privileged instructions, and 
executes from main storage with a nonzero 
protection key. 


procedure: See cataloged procedure. 
profile: See user profile. 


program status word: A doubleword in main 
storage that controls the order in which 
instructions are executed. 


prompting: A system function that helps a 
terminal user by requesting him to supply 
operands necessary to continue processing. 


prompting message: A message that requests 
the terminal to enter another line of 


input, either a TSO command parameter or 
data. 


protection key: An indicator associated 
with a task which appears in the program 
status word whenever the task is in 
control, and which must match the storage 
keys of all storage blocks the task is to 
use. 


PSCB:; See Protected Step Control Block. 


PSW (program status word): A doubleword in 
main storage that controls the order in 


which instructions are executed. 


PUTGET: A TSO service routine that sends a 
message to the terminal and obtains a line 
of input from the current source of input. 


PUTLINE: A TSO service routine that sends 
output to the terminal. PUTLINE 
selectively puts out messages according to 
whether or not a user has suppressed 
prompting or is executing a command 
procedure. 


qualified name: A data set name that is 
composed of two or more names separated by 


periods. (For example, MOORE.SALES.JUNE.) 
qualifier: In TSO, the lowest level 


identifier of a qualified name. 


RCT: See Region Control Task. 
reader/interpreter;: A job scheduler 
function that services an input job stream. 


receive interruption: The interruption of 
a transmission to a terminal by a higher 
priority transmission from the terminal. 
Synonymous with break. 


record: One or more data fields that 
represent an organized body of related 
data, such as all of the basic accounting 
information concerning a single sales 
transaction. (See also logical record and 
physical record.) 


reenterable: The attribute or 
characteristic of a load module allows the 
same copy of the module in main storage to 
be used by several tasks concurrently. 


region: An area of main storage allocated 
to a job step and assigned a unique storage 
protection key. Time sharing jobs share 
regions. Each job occupies a region 
briefly, then is swapped out to auxiliary 
storage and another job is swapped into the 
vacated main storage area for execution. 
The jobs are swapped in and out until they 
are completed. 


Region Control Task (RCT): The TSO control 
program routine handling quiesce/restore 


and LOGON/LOGOFF. There is one RCT for 
each active foreground region. 


return code: A number placed ina 
designated register at the completion of a 


program. 


self-defining delimiter: Any character 
appearing in the first position of certain 
character strings in the TSO command 
language. A repetition of the character 
within the string is interpreted as a 
delimiter. 


separator: A delimiter used to separate 
fields in an input line to the system. 


Simulated attention: A function that 
allows terminals without attention keys to 
interrupt processing. The terminal is 
queried (for a specified character string 
meaning “"attention'') after a specified 
number of seconds of uninterrupted 
execution or after a specified number of 
lines of consecutive output. 
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STACK: A TSO service routine that 
manipulates the Input Stack. 


STAE (Specify Task Asynchronous Exit): A 
macro instruction specifying a routine to 


receive control in the event of the issuing 
task's abnormal termination (ABEND). 


STAI (Subtask ABEND Intercept): A keyword 
of the ATTACH macro instruction specifying 


a routine to receive control after the 
abnormal termination of a subtask. 


STATUS: A system macro instruction and its 
associated SVC routine that makes one or 
more tasks dispatchable or 
non-dis pat chable. 


STATUS START: The form of the STATUS macro 
instruction that makes one or more tasks 
dispatchable. 


STATUS STOP: The Form of the STATUS macro 
that makes a task non-dispatchable. 


storage list: In TSO, an in-storage list 
that contains data. Contrast with 
procedure list. 


subcommand: In TSO, an explicit request 
for a particular operation to be performed 
within the scope of a command processor. 


SYS1.CMDLIB: The system command library. 

A partitioned data set that contains, among 
other things, the TSO command processors. 

A user data set may be concatenated to 
SYS1.CMDLIB. 


SYS1.LINKLIB: The system linkage library. 
A partitioned data set that contains 
often-used routines. The contents of the 
linkage library are placed in main storage 
during initial program loading (IPL). 


SYS1.PROCLIB: A system data set containing 
cataloged procedures. 


task: A unit of work for the central 
processing unit defined by the control 


program. 


TCAM : 
Method. 


See Telecommunications Access 


Task Control Block (TCB): A system control 
block that contains task-related 
information. 

TCB: See Task Control Block. 
Telecommunications Access Method (TCAM): A 
generalized terminal I/O support package, 
providing application program independence 
of terminal characteristics. 


terminal: A device resembling a typewriter 
that is used to communicate with the 
system. 


J 
terminal job: A foreground job, a session 

from LOGON to LOGOFF. Also used to refer 

to the main storage region assigned to a 


user and associated system control blocks. 


Terminal Job Identification (TJID): A 
two-byte identification assigned to each 
terminal job. 


Terminal Monitor Program (TMP): A program 
that accepts and interprets commands from 


the terminal, and causes the appropriate 
command processors to be scheduled and 
executed. 


terminal user: See user. 


TGET: An I/O macro instruction used by TSO 
problem programs to obtain a line of input 
from the terminal. Used by the GETLINE and 
PUTGET service routines. 


time sharing: The concurrent sharing of 
the hardware and information resources of a 
data processing installation among one or 
more users who may be located at remote 
terminals. 


Time Sharing Control Task (TSC): A TSO 
system task that handles system 
initialization, allocation of time-shared 
regions, the swapping of user programs into 
and out of main storage, and general 


control if the time-sharing operation. 


TJID: See Terminal Job Identification. 
TMP: See Terminal Monitor Program. 
TPUT: An I/O macro instruction used by TSO 


problem programs to send a line of output 
to the terminal. Used by the PUTLINE and 
PUTGET service routines. 

TSC: See Time Sharing Control Task. 

ttr: A pointer in a partitioned data set 
directory to the first block of a member on 
a direct access device. The "tt" 
represents the relative track from the 
beginning of the data set. The "°r" 
represents the relative block number on 
that track. 


unit address: The symbolic location of an 
input/output device. 


UPT: See User Profile Table. | 


user: In TSO, anyone with an entry in the 


User Attribute Data Set; anyone eligible t’ 
log on. 
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user attributes: A set of parameters in 
the User Attribute Data Set (UADS). The 
parameters describe the user to the system; 
for example, whether he is authorized to 
use the ACCOUNT command, and what size main 
storage region he is to be assigned. 


User Attribute Data Set (UADS): A 
partitioned data set with a member for each 
authorized system user. Each member 
contains the appropriate passwords, user 
identifications, account numbers, logon 
procedure names, and user characteristics 
defining the user profile. 

USERID: See user identification. 

user identification (USERID): A one- to 
seven-character symbol identifying each 
system user. 


user profile: The set of characteristics 
that describe the user to the system. See 
also User Profile Table. 


User Profile Table: A table of user 
attributes kept for each active user, 
by the Logon/Logoff Scheduler from 
information in the LOGON command, the UADS, 
and the user logon procedure. 


built 


VTOC: See Volume Table of Contents. 


volume: A area of a recording medium that 
is serviced by a single read/write 
mechanism whose operation is entirely 
independent of any other read/write 
mechanism. 


Volume Table of Contents (VTOC): A table 
of information in a direct access volume 
that defines the sets of data and 
unassigned space in the volume and 
indicates where they are located. 
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The OS/VS Master Index of Logic, GY28-0603 
consolidates the indexes from all the 


program logic manuals. It may therefore 
provide reference to additional information 
about any of the topics listed below 
through other publications. 


ADDRESS 

parameter type 129 
allocate a data set 

by ddname 225, 234 

by dsname 225,234 
allocate a SYSOUT data set 225,234 
allocating data sets 228 
ATRCB (see attribute control block) 
attention exit routine 

in command processor 27,38 

in terminal monitor program 27,38,47 
attention request 

handled by command processor 

handled by terminal monitor 

program 27,38 

attention scheduler 27,38 
Attribute control block 

format 285-286 

use 230-231 


27,38 


bottom element (see Input Stack) 


CAM2 (see LOCATE Parameter List) 
Candidate list 
format 287 
use 242 
Catalog information routine 
description 381 
entry codes 384-385 
hierarchy 390 
operation 383, 388 
parameters 383 
register usage 394 
return codes 395 
Catalog information routine parameter list 
(CIRPARM) 
format 372,392 
use 375,388 
CATLST (see concatenate list) 
CATTAB (see concatenate table) 
CBUF (see command buffer) 
character types 
recognized by command scan service 
routine 123 
recognized by parse service routine 123 
CIRPARM (see catalog information routine 
parameter list) 
Clearing DDRs (see dynamic device request) 


Index 


Command buffer 
format 50 
use by command scan service routine 122 
use by parse service routine 124-139 
use by PUTGET service routine 74 
use by terminal monitor program 26 
command library 26,36 
command mode 
in PUTGET service routine 
command processors 
functions of 17-18 
list of 17-18 
termination of 24,25 
ways they receive control 17-18 
Command processor parameter list (CPPL) 
format 50 
use 26,36 
Command scan output area (CSOA) 
format 167 
use 122,144 
Command scan parameter list (CSPL) 
format 166 
use by command scan service 


74,86 


routine 121,144 
use by default service routine 368,373 
use by terminal monitor program 26,36 


Command scan service routine 
description 119 
hierarchy 156 
operation 120-140,144 
parameters 120 
register usage 216 
return codes 217 
Command scan workspace (CSWORK) 
format 168 
use 144 
concatenate data sets 225,229,242 
Concatenate list (CATLST) 
format 288 
use 242 
Concatenate table (CATTAB) 
format 289 
use 242 
CONSTANT 
parameter type 133 
control codes 
to default service routine 365 
converting data set attributes 229 
CPPL (see command processor parameter list) 
CSOA (see command scan output area) 
CSPL (see command scan parameter list) 
CSPLARM (see also command scan parameter 
list) 
format 373 


use by default service routine 368,373 


DAIR attribute control block (DAIRACB) 
format 290 
use 230-231 
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DAIR error code analyzer 
diagram for 250 
directory for 282 
explanation of 232 
hierarchy of 253,256 
messages from 345-346 
module Operation description of 269 
DAIR parameter block (DAPB) 
format 
code X*00° 295-296 
code X*O4f 297-298 
code X'08* 299-301 
code X'QC* 302 
code X‘'10' 303 
code X‘14" 304 
code X'18" 305-306 
code X'1C* 307 
code X*'24° 308-310 
code X'28‘° 311 
code X*2C° 312 
code X"'30' 313-314 
code X"'34" 315 
use 224,234 
DAIR parameter list (DAPL) 
format 318 
use 224,234 
DAIR service routine (see dynamic 
allocat on interface routine) 
DAIR work area (DAIRWA) 
format 292-294 
use 223 
DAIRACB (see DAIR attribute control block) 
DAIRFAIL (see DAIR error code analyzer) 
Data set extension (DSE) 
format 316-318 
use 225,246 
data set name 
fully qualified 363,381 
DAWT (see dynamic allocation work table) 
DAWTVARY (see dynamic allocation work 
table, variable area) 
DDR (see dynamic device request) 
deconcatenating data sets 229-230 
Default parameter block (DFPB) 
format 374 
use 368 
Default parameter list (DFPL) 
format 375 
use 5368 
Default service routine 
control codes 365 
description 363 
entry codes 365 
hierarchy 370 
messages 3/717 
Operation 364-366, 368 
parameters 364 
register usage 376 
return codes 378 
DELIMITER 
parameter type 128 
DEQ (see dequeue macro instruction) 
vequeue macro instruction (DEQ) 
parameter list for 339 
use of 236 
LDFPB (see default parameter plock) 
DFPL (see default parameter list) 
DSE (see data set extension) 


DS NAME 


parameter type 132 | } 
DSTHING 


parameter type 133 
Dynamic allocation interface routine (DAIR) 
description 221 
error code analyser 232 
(see also DAIR error code analyser) 
functions 225 
hierarchy 252-254 
operation 223-225,234 
parameters 224 
register usage 376 
return codes 378 
Dynamic allocation routines (SVC 99) 
description 221 
functions 226 
hierarchy 255 
Operation 226-250 
parameters 226 
register usage 348-354 
return codes 356-360 
Dynamic allocation parameter blocks 
format 
code X'00O* 319-320 
code X*'01° 321-324 
code X'02° 325-326 
code X*03° 326 
code X*O4¥° 327 
code X'Q6" 328-329 
code X‘'0O7* 330 
use 226, 236-246 
Dynamic allocation work table (DAWT) 331 
Dynamic allocation work table, variable ; 


area (DAWTVARY) 
for CONCAT 336 
for CONVERT 335-336 
for DATASET 332-333 
for UNALLOC 334 
for UPDATE 337-338 
Dynamic device request (DDR) 
clearing after ABEND 231-232 
definition of 231 


ECT (see environment control table) 
ENY (see enqueue macro instruction) 
Enqueue macro instruction (ENQ) 

parameter list for 339 

use of 236 

work area for 340 
Enqueue work area (EWA) 340 
Enqueue/dequeue parameter list 339 
entry codes 

to Catalog information 

routine 384-385,388 

to Command scan service 

routine 121,122,144 

to default service routine 365,368 

to dynamic allocation interface 

routine 234 

to dynamic allocation routines 236-246 

to GETLINE service routine 82 

to PUTGET service routine 86-88 

to PUTLINE service routine 84 

to STACK service routine 80 
Environment control table 51-52,96-97 
Error code analysis (see DAIR error code 
analyser) 
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EWA (see enqueue work arae) 
EXPRESSION 
parameter type 135 
EXTRACT macro instruction 
use by terminal monitor program 25,34 


first element (see input stack) 
Flag word 

format 121 

use 121 
format only 

option of PUTLINE service routine 84 
formatting of messages 

by PUTGET service routine 86-88 

by PUTLINE service routine 84 

by TERMOUT subroutine 84-88 
freeing data sets 228,236 
fully qualified data set name 363,381 


GETLINE parameter block (GTPB) 
format 98-99 
use 72 

GETLINE service routine 
description 69 
hierarchy 90 
operation 72,82 
parameters 72 
register usage 113~114 
return codes 115-116 

GTPB (see GETLINE parameter block) 


hierarchy 
Catalog information routine 390 
Command scan service routine 156 
DAIR error code analyzer 253,256 
Default service routine 370 
Dynamic alloaction interface 
routine 254 
Dynamic alloaction (SVC 99) 
routines 255 
GETLINE service routine 90 
Parse service routine 156-158 
Parse2 service routine 156-158 
PUTGET service routine 90 
PUTLINE service routine 90 
STACK service routine 90 
Terminal monitor program 44 


Input stack (INSTACK) 
description 71 
format 100 
use 71,80 
INSTACK (see input stack) 
in-storage list 
description 71 
use 71,74 
IOPL (see I/O parameter list) 
IOSRL (see 1/0 service routine list) 
I/O parameter list (IOPL) 
format 120 
use by Default service routine 375 
use by GETLINE service routine 72,82 


use by PUTGET service routine 74,86,88 


use by PUTLINE service routine 73,84 
use by STACK service routine 71,80 


I/O service routine list 
format 102 
use by GETLINE service routine 82 
use by PUTGET service routine 82,84 
use by STACK service routine 71,80 


List source descriptor (LSD) 
format 103 
use by GETLINE service routine 82 
use by PUTGET service routine 82,84 
LOCATE macro instruction 
return codes 395 
use by catalog information routine 
383,388 
LOCATE parameter list 
format 393 
use by catalog information routine 
383,388 
LOGON procedure 
and dynamic allocation routine 
234, 511, 512 
and terminal monitor program 25,32 
LOGON/LOGOFF scheduler 
giving control to terminal monitor 
program 27,32 
use of terminal I/O service routines 
69,78 


managing user-selected data set attributes 
230-231 
messages issued by 
DAIR error code analyser 345-346 
Default service routine 377 
Parse service routine 215 
PUTGET service routine 112 
PUTLINE service routine 112 
Terminal monitor program 63 
message writer, for DAIRFAIL (see DAIR 
error code analyser) 


OLD (see output line descriptor) 

operands, searching for 126-138 

Output line descriptor (OLD) 
format 104 


use by PUTGET service routine 75,86, 88 


use by PUTLINE service routine 73,84 


parameters 


Catalog information routine 384-385, 388 


Command scan service routine 
121-122,142 

DAIR error code analyser 232 

Default service routine 364,368 

Dynamic allocation interface routine 
224,226,234 


Dynamic allocation routines 226,236-248 


GETLINE service routine 72,82 

Parse service routine output 140,146 
PUTGET service routine 74,86,88 
PUTLINE service routine 73,84 

STACK service routine 71,80 


Index 


Parameter control entry (PCE) 
for IKJENDP macro instruction 169 


for IKJIDENT macro instruction 170-171 


for IKJKEYWD macro instruction 172 
for IKJNAME macro instruction 173 
for IKJPARM macro instruction 174 


for IKJPOSIT macro instruction 175-176 


for IKJSUBF macro instruction 184 
for IKJTERM macro instruction 178-179 
for IKJOPER macro instruction 180-181 


for IKJRSVWD macro instruction 182-183 


Parameter control list (PCL) 126,146 
Parameter descriptor entry (PDE) 
for IKJIDENT macro instruction 185 
for IKJKEYWD macro instruction 186 
for IKJPARM macro instruction 186 


for IKJPOSIT macro instruction 187-192 


for IKJTERM macro (constant) 193 

for IKJTERM macro (variable) 194 

for IKJTERM macro (variable, data-name 
qualifier) 195 

for IKJTERM macro (statement number) 
196 


for IKJRSVWD macro (reserved word) 197 


for IKJOPER macro (expression) 198 
Parameter descriptor list (PDL) 126,146 
Parse macro instructions 

brief description of 125 
Parse parameter list (PPL) 

format 199 

use 126,146 
Parse permanent workspace (PWORK) 

format 200-207 

use 148 
Parse recursive workspace (RWORK) 

format 209 

use 126,148 
Parse service routine 

' description 119 

hierarchy 297 

messages 215 

operation 120-140,146 

parameters 125-126,146 

register usage 216 

return codes 217 
Parse2 service routine (see entries for 

parse service routine) 
Pattern construction area 341 
PCA (see pattern construction area) 
PCE (see parameter control entry) 
PCL (see parameter control list) 
PDE (see parameter descriptor entry) 
PDL (see parameter descriptor list) 
PGPB (see PUTGET parameter block) 
PPL (see parse parameter list) 
Procedure element 71-72 
Protected step control block (PSCB) 
34,52-54 
PSCB (see protected step control block) 
PSTRING parameter type 131 
PTPB (see PUTLINE parameter block) 
PUTGET parameter block (PGPB) 

format 105-106 

use 74,86,88 
PUTGET service routine 

description 69 

hierarchy 90 

messages 112 


Operation 74-75,86,88 
parameters 74, 86,88 
register usage 113-114 
return codes 115-116 
PUTLINE parameter block (PTPB) 
format 107-108 
use 73-84 
PUTLINE service routine 
description 69 
hierarchy 90 
messages 112 
operation 73 
parameters 73 
register usage 113-114 
return codes 115-116 
PWORK (see parse permanent workspace) 


OSTRING 
parameter type 133 


Register usage 
catalog information routine 394 
command scan service routine 216 
default service routine 376 
dynamic allocation interface routine 
347 
dynamic allocation (SVC 99) routines 
348-355 
GETLINE service routine 113-114 
parse service routine 216 
PUTGET service routine 113-114 
PUTLINE service routine 113-114 
STACK service routine 113-114 
terminal monitor program 64 
RESERVED WORD 
parameter type 136 
return codes 
catalog information routine 395 
command scan service routine 217 
default service routine 378 
dynamic allocation interface routine 
355 
dynamic aloocation (SVC 99) routines 
356-360 
GETLINE service routine 115-116 
LOCATE routines 395 
parse service routine 217 
PUTGET service routine 115-116 
PUTLINE service routine 115-116 
STACK service routine 115-116 
terminal monitor program 65 
RWORK (see Parse Recursive Workspace) 


SCB (see STAE control block; STAI control 
block) 
SIOT (see step input output table) 
SPACE character type 133 
STACK parameter block (STPB) 
format 109 
use 71-72,80 
STACK service routine 
description 69 
hierarchy 90 
operation 71-72,80 
parameters 71,80 
register usage 113-114 
return codes 115-116 
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c 


STAE control block 
STAE exit routine 
in clearing dynamic device requests 
231-232 
in command processor 29 
in terminal monitor program 
STAE macro instruction 29 
STAI control block (SCB) 28 
STAI exit routine 
in terminal monitor program 40 
STAI operand on ATTACH macro instruction 
28 


(SCB) 29 


29,42 


STATEMENT NUMBER parameter type 135 
STAX macro instruction 
issued by command processor 27,38 


issued by terminal monitor program 

27,38 
Step input/output table (SIOT) 

in allocation 228 

in attribute conversion 

in unallocation 228 
storage element 71 
STRING character type 129 
svc 99 (see dynamic allocation routines) 
Syntax checking mask area 210 
SYSOUT data set 

allocation of 225,234 

freeing of 238 
SYSOUT work area 
SYS1.LINKLIB 221 
SYS1.SVCLIB 221 


229 


342 


TAIE (see terminal attention interrupt 
element ) 
Task input/output table (TIOT) 
description of 221,222 
in allocation 228 
in attribute conversion 
in concatenation 229 
in deconcatenation 230 
in unallocation 228 
TAXE (see terminal attention exit element) 
Terminal attention exit element (TAXE) 
format 55 
use 38 
Terminal attention interrupt element (TAIE) 
format 56 
use 38 
Terminal monitor program 
description of 14 
hierarchy 44 
messages 63 
operation 24-29 


229 


parameter list for 58 

register usage 64 

return codes 65 
TEST command processor 

parameter list for 57 

passing control to 26,36 
TEST parameter list (TPL) 

format 57 

use 36 
Text insertion parameter list (TXINPARM) 

110 

TIME command processor 

loaded by terminal monitor program 

25,34 

TIOT (see task input/output table) 
TMP (see terminal monitor program) 
TMP retry work area (TMPWA2) 

format 59 

use 42 
TMP work area (TMPWORKA) 

format 60 

use 34 
TMPWA2 (see TMP retry work area) 
TMPWORKA (see TMP work area) 
Top element (see input stack) 
TXINPARM (see text insertion parameter 

list) 


Unallocate work area 343 
Updating the DSE and DCB 230 
UPT (see user profile table) 


Userid 
part of fully qualified data set name 
363, 381 
prefixing to data set name 224,366 
USERID 


parameter type 131-132 
User profile table (UPT) 
format 62,111 
use by terminal I/O service routines 88 
use by terminal monitor program 25,34 


Validity check exit 
in parse service routine 136 

Validity check parameter list (VCEPARM) 
format 213 
use 136 

VALUE parameter type 129 

VARIABLE parameter type 148 

VCEPARM (see Validity check parameter list) 
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